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The  FAA  Communications  Cost  Model  described  in  this  report  is  a  computer  program 
designed  to  be  used  as  an  overall  communications  planning  tool.  The  program  has 
been  designed  to  address  management  questions  dealing  with  long-term,  national- 
level  communications  planning  issues.  The  model  was  developed  and  coded  in 
FORTRAN  IV-G  for  the  IBM  360/65  computer  at  the  Transportation  Computer  Center 
and  most  time  sharing  systems.  The  documents  related  to  this  study  are:  Report 
No.  FAA-ASP-80-6,  "FAA  Communications  Cost  Model  User's  Guide  (Revised),"  and 
Repor^  NoT  FAA-ASP-80-8,  "Impact  of  Selected  FAA  Programs  on  Switched  and  Non- 
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CHAPTER  ONE 


INTRODUCTION 


V  ) 

The  FAA  Communications  Cost  Model -described  in  this  report  is  a  compu¬ 
ter  program  designed  to  answer  management  questions  dealing  with  long-term, 
national-level  communications  planning  issues.  Therefore,  the  program  is 
purposely  directed  toward  estimating  long-term  macro-level  (as  opposed  to 
near-term,  micro-level)  communications  costs.  The  algorithms  used  emphasize 
cause-and-effect  relationships  (rather  than  direct  extrapolation  of  cost 
data)  to  predict  costs.  This  report  documents  the  communications  model 
computer  program.  It  includes  a  description  of  the  model  equations,  func¬ 
tional  flow  charts,  and  the  program  listings.  It  should  be  used  in  con¬ 
junction  with  the  revised  FAA  Communications  Model  User's  Guide*  for  a 
comprehensive  understanding  of  the  computer  software.  This  edition  super¬ 
sedes  the  issue  dated  May  1979 .  - - - 

Special  care  has  been  taken  during  the  formulation  of  the  model  equa¬ 
tions  to  concentrate  on  the  high-cost  areas  of  FAA  communications.  The 
program  uses  the  FAA  forecasts  of  aircraft  traffic  as  the  fundamental  driver 
of  communications  requirements.  This  forecast  employs  four  separate 
parameters: 

•  Instrument  Flight  Rules  (IFR)  Aircraft  Handled  at  ARTCCs 

•  Total  Operations  at  Airports 

•  Instrument  Operations  at  Airports 

•  Total  Flight  Services 

The  numbers  of  sectors,  towers.  Terminal  Radar  Approach  Control  Facili¬ 
ties  (TRACONs)  and  Flight  Service  Stations  (FSSs)  required  to  accommodate 
the  forecast  aircraft  activity  are  calculated.  The  number  of  other  facili¬ 
ties  required  to  support  the  increased  communication  load  is  then  determined 
using  current  facility  planning  methods.  Finally,  the  cost  of  each  facility 
is  computed.  The  user  has  the  option  of  providing  a  number  of  inputs  to  the 
program  to  modify  certain  costs  (e.g.,  inflation  rate,  system  implementation 
dates,  and  level  of  system  automation) . 


*FAA  Communications  Model  User's  Guide ,  (Revised),  Report  No.  FAA-ASP-80-6. 
ARINC  Research  Corporation,  Annapolis,  Maryland. 
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This  chapter  has  presented  a  brief  overview  of  the  cost  model.  Chapter 
Two  describes  the  communication's  cost  model  in  detail,  including  how  costs 
are  determined,  where  and  when  the  model  may  be  applied,  and  the  inputs  and 
outputs  required  for  proper  model  operation.  Chapter  Three  addresses  all 
the  model  equations  that  were  derived,  including  the  rationale  for  each 
equation.  The  model  computer  program  source  listing  as  well  as  a  general 
flow  chart  and  the  Operations  and  Maintenance  (O&M)  and  Facilities  and 
Equipment  (FfiE)  baseline  cost  data  bases  are  included  in  Chapter  Four. 
Chapter  Five  defines  the  symbols,  both  scalers  and  subscripted  variables, 
that  are  used  in  the  computer  program.  Finally,  the  appendix  contains  the 
FAA  facility  alpha  codes  and  descriptions. 


CHAPTER  TWO 


COMMUNICATIONS  COST  MODEL 


An  FAA  communications  cost  study  was  required  to  evaluate  the  cost 
impact  of  several  alternative  approaches  to  meeting  the  FAA's  operational 
communications  requirements  through  the  year  2008.  This  was  accomplished 
by  development  and  use  of  an  analytic,  computer-based  communications  cost 
model  that  calculates  new  facility  and  equipment  costs,  operations  and 
maintenance  costs  for  new  and  old  equipment,  leased  circuit  and  equipment 
costs,  and  user-assigned  costs  that  are  added  directly  into  the  final  model 
outputs.  Results  are  computed  on  the  basis  of  the  specified  inflation  rate. 
The  FAA  communications  model  will  compute  cumulative  and  annual  costs  in 
the  report  format  requested  by  the  user. 


2.1  DESCRIPTION  OF  THE  COST  DETERMINATION  PROCESS 

Examination  of  the  operational  functions  of  communications  in  the  ATC 
system  revealed  that  communications  services  and  the  types  of  communications 
facilities  they  require  stem  directly  from  the  operational  requirements 
associated  with  certain  major  components  of  the  FAA's  Air  Traffic  Control 
(ATC)  system.  These  components  can  be  categorized  into  the  following  types 
of  ATC  operational  units: 

•  Individual  En-Route  Sectors 

•  Air  Traffic  Control  Towers  (ATCTs) 

•  Terminal  Radar  Approach  Control  Facilities  (TRACONs) 

•  Flight  Service  Stations  (FSSs) 

•  Air  Route  Traffic  Control  Centers  (ARTCCs) 

Fpr  each  type  of  operational  unit,  a  typical  communications  equipment 
configuration  can  be  defined.  This  can  be  done  through  analysis  of  repre¬ 
sentative  operational  units  and  with  the  aid  of  FAA  data  bases  describing 
the  current  deployment  of  communications  equipment  [e.g.,  the  data  base  of 
the  Transportation  Systems  Center  (TSC)  of  the  U.S.  Department  of  Transpor¬ 
tation]  .  With  the  communications  for  each  type  of  ATC  operational  unit  so 
described,  the  growth  in  the  total  communications  plant  can  be  directly 
related  to  the  growth  in  the  number  of  ATC  operational  units.  This  growth 
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is,  in  turn,  driven  by  the  growth  in  number  and  type  of  aircraft  movements 
according  to  established  FAA  criteria  for  commissioning  of  new  ATC  opera¬ 
tional  units. 

The  modeling  approach  permits  consideration  of  a  wide  range  of  scenar¬ 
ios.  Changes  to  operational  requirements  can  be  accommodated  by  modifying 
the  communi cations  services  associated  with  a  typical  operational  unit. 

The  effect  of  future  automation  can  be  included  by  modifying  the  criteria 
defining  the  number  of  operational  units  required  to  service  a  given  traffic 
level.  Cost-saving  advances  in  communications  technology,  tariff  changes, 
etc.,  can  be  incorporated  by  modifying  the  cost  data  base.  The  general 
approach  is  summarized  in  Figure  2-1. 

The  initial  step  in  the  cost  determination  process  is  to  compute  the 
1979  baseline  communications  cost  from  the  data  provided  in  the  F&E  and  O&M 
data  bases.  To  this  baseline  cost  will  be  added  the  new  facility  costs, 
circuit  costs,  and  leased  equipment  costs  required  to  service  the  increased 
demand  computed  from  air  traffic  forecasts.  Four  separate  aircraft  activity 
forecasts  (identified  in  Figure  2-1)  are  used  (based  on  FAA  forecasts), 
extrapolated  through  the  year  2008  (see  Section  3.1,  Chapter  Three).  The 
forecasts  are  then  used  to  predict  the  number  of  operational  units  in  each 
of  the  five  major  categories  (sectors,  towers,  centers,  terminal  radar 
facilities,  and  FSSs) .  Most  other  communications  facilities  may  be  related 
to  one  of  the  five  major  categories  on  the  basis  of  statistics  developed 
from  the  existing  communication  system.  Some  facilities,  however,  increase 
independently  of  operational  unit  growth,  while  others  remain  fixed.  The 
FAA  has  more  than  120  facility  types  of  which  only  64  have  been  identified 
as  relating  to  communication.  Of  the  64  it  was  determined  that  the  percen¬ 
tage  of  facility  costs  due  to  communications  varied  between  3  percent  and 
100  percent.  Communications  costs  are  derived  from  the  number  of  facili¬ 
ties  and  the  estimated  percentage  of  total  facility  costs  attributed  to 
communications.  Before  determining  system  costs,  the  requirements  for 
voice,  data,  and  radio  circuits  necessary  for  all  facilities  are  computed. 
The  quantity  and  length  of  communications  circuits  plus  the  cost  of  leased 
equipment  required  are  then  used  to  calculate  the  system  costs.  Finally, 
the  cost  model  will  output  the  calculated  data  in  the  form  specified  by  the 
user  from  an  optional  list  of  report  types.  The  model  provides  for  infla¬ 
tion  and  discounting.  (See  the  User's  Guide*  for  a  sample  of  output  report 
types . ) 

The  user  may  elect  to  override  the  model  by  (1)  using  different  fore¬ 
casts  than  those  included  in  the  internal  equations,  (2)  entering  optional 
inputs  for  the  operational  requirements  and  system  costs,  (3)  entering 
fixed  costs  that  are  simply  added  to  the  annual  costs  computed,  or  (4) 
appending  user-defined  facility  types.  All  user-elected  options  are  pro¬ 
vided  as  specific  computer  card  inputs  as  described  in  the  User's  Guide. 

An  example  of  the  cost  determination  process  for  calculating  the  future 
communications  costs  of  en-route  sectors  is  given  below. 


*Ibid. 
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The  number  of  en-route  sectors  is  determined  as  a  function  of  the 
number  of  IFR  operations  at  ARTCCs.  The  number  of  sector- related  communica¬ 
tions  facilities  is  determined  as  a  function  of  the  number  of  sectors  and 
the  average  number  of  communications  facilities  per  sector  (including 
capital  equipment,  leased  equipment,  and  maintenance) .  Total  sector-related 
communications  costs  are  then  determined  on  the  basis  of  projected  F&E  costs, 
O&M  costs,  and  leased  costs  for  the  specific  facilities  involved.  The  cost 
model  computer  program  contains  an  F&E  and  O&M  cost  data  base  from  which  the 
cost  projections  for  various  facility  types  are  computed  (see  Section  4.3). 
Various  common  carrier  tariffs  such  as  Telpak  and  multi-schedule  private 
line  (MPL)  are  also  included  in  the  costing  portion  of  the  model.  In 
addition,  the  user  may  specify  a  number  of  other  options  such  as  inflation 
rate  or  new  system  implementation  schedule.  Similarly,  the  model  generates 
costs  for  towers,  TRACONs,  FSSs,  centers,  and  other  communications 
facilities. 


2.2  APPLICABILITY 

Several  significant  characteristics  of  the  FAA  Communications  Model 
are  discussed  below: 

•  High-Level  User  Input.  User  inputs  to  the  model  are  in  terms  of 
broad,  operationally  defined  requirements  that  do  not  require 
detailed  user  knowledge  of  communications  system  design.  Precise 
characteristics  of  new  facilities  and  actual  geographic  locations 
are  not  needed.  The  advantage  of  this  approach  is  that  the  model 
will  be  useful  to  a  broad  spectrum  of  users  and  not  just 
communications  engineers. 

•  Long-Term  Macro  Analysis.  The  model  is  primarily  intended  to 
address  long-term,  macro-level  communications  issues  as  opposed 
to  short-term,  micro-level  issues.  The  shortest  period  the  model 
is  capable  of  analyzing  is  one  year.  It  computes  total  FAA  com¬ 
munications  requirements  for  the  48  contiguous  states  and  for 
Alaska,  Hawaii,  and  Puerto  Rico.  The  forecast  algorithms  employed 
permit  analysis  of  any  period  from  1980  through  2008. 

•  Accuracy .  The  model  is  designed  to  provide  order-of-magnitude 
costs  rather  them  specific  costs  on  which  a  detailed  budget  can  be 
based.  The  primary  interest  is  the  relative  cost  of  one  communica¬ 
tions  system  compared  with  an  alternative  system.  Actual  costs 
(from  1978  FAA  cost  data)  are  believed  to  be  within  10  percent  of 
the  computed  values. 

•  Limitations .  The  model  does  not  currently  include  data  for  FAA 
facilities  that  do  not  have  communications  functions.  Of  the  64 
different  facilities  included,  many  serve  functions  that  are  con¬ 
sidered  partially  communications.  However,  storage  space  exists 
for  95  facilities;  thus,  other  facilities  of  interest  may  be  added 
at  run  time.  Estimated  connnunications  percentages  for  each  facil¬ 
ity  type  are  presented  in  Chapter  Four.  The  correct  percentage 


will  vary  somewhat  depending  on  the  particular  alternative  being 
evaluated  and  the  context  in  which  the  evaluation  is  performed. 

The  model  does  not  include  the  cost  of  operating  personnel  nor 
the  cost  of  administrative  communications  circuits.  These  types 
of  costs  can  be  added  directly  to  the  output,  if  desired,  using 
certain  model  options.  A  further  limitation  of  the  present  pro¬ 
gram  is  that  any  circuit  designated  to  be  switched  or  priced  under 
a  new  tariff  will  be  switched  and  repriced  for  all  years  of  the 
run  beginning  in  1979.  This  also  applies  to  the  user-specified 
productivity  factors. 

*  General  Issues  to  be  Addressed  by  the  Model.  The  model  permits  the 
evaluation  of  many  specific  issues  affecting  FAA  communications: 

••  Aviation  growth  (e.g.,  increases  in  total  aircraft  traffic  or 
IFR  traffic) 

••  Communications  system  innovation  (e.g.,  switched  voice,  com¬ 
bined  voice  and  data) 

• •  Introduction  of  new  FAA  systems  that  affect  FAA  communications 
(e.g.,  automation,  DABS) 

••  Changing  communications  tariffs  (e.g.,  introduction  of  satel¬ 
lite  circuits) 

••  FAA  procedural  or  administrative  changes  (e.g.,  consolidation 
of  centers,  requiring  all  operations  at  50  busiest  airports  to 
be  IFR) 

The  model  computes  the  communications  cost  for  the  time  period  of 
interest.  This  provides  absolute  communications  costs  and  data 
that  can  be  used  in  comparative  cost  analyses.  A  model  with  this 
range  of  capability  is  able  to  address  almost  any  specific  com¬ 
munications  issue  that  may  be  of  interest  to  the  FAA. 


2.3  MODEL  INPUTS 

This  section  describes  the  inputs  that  are  used  by  the  model,  their 
relationships  to  each  other,  and  their  interactions  with  the  model's  in¬ 
ternal  nominal  data  base.  Figure  2-2  illustrates  the  various  types  of 
inputs  and  how  they  are  related.  The  F&E  and  O&M  data  bases  internal  to 
the  model  are  detailed  in  the  User's  Guide.  Any  of  these  nominal  data 
values  can  be  changed  by  the  user  as  more  current  data  become  available. 
Specific  considerations  relating  to  model  parameters  and  variables  are 
discussed  in  the  following  paragraphs: 

•  Facilities  and  Equipment  Costs.  All  F&E  costs  are  assumed  to  be 
one-time  expenses  and,  as  a  result,  no  depreciation  is  computed 
for  existing  equipment.  New  facilities  and  equipment  will  be  added 
tothe  existing  system  in  two  ways:  (1)  normal  system  growth 
(based  on  user  inputs  or  official  FAA  forecasts  if  no  specific 
user  input  is  provided),  and  (2)  new  systems  that  are  added  by 
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Figure  2-2.  COST  MODEL  INPUTS 


the  model  user.  The  model  contains  noininal  facility  costs  for  all 
present-day  communications  equipment  and  inflation  factors  that 
affect  increases  in  the  nuiAber  of  facilities  required  as  a  result 
of  forecast  aircraft  traffic  growth.  The  F&E  cost  corresponding 
to  system  growth  is  automatically  computed  by  the  model.  However, 
since  no  depreciation  is  programmed,  the  user  should  consider  the 
useful  life  of  the  equipment  and  should  input  F&E  replacement  costs 
in  the  appropriate  years  if  the  user  wants  to  determine  the  total 
F&E  expenditures  in  future  years.  A  second  category  of  F&E  expense 


will  be  input  by  the  user  to  cover  the  cost  of  new  systems  that  are 
added  to  enhance  the  performance  of  the  FAA's  system.  This  cate¬ 
gory  of  F&E  expenses  includes  projected  costs  for  new  systems  such 
as  DABS,  ATARS,  MLS,  etc.  These  costs  will  be  input  to  the  model 
in  the  form  of  additional  cards  included  at  model  run  time. 

The  F&E  expenditures  must  reflect  the  actual  implementation  schedule. 
For  example,  authorization  in  one  year  of  an  F&E  program  may  result 
in  a  program  that  requires  four  years  to  implement  fully.  The  F&E 
and  O&M  costs  associated  with  the  new  equipment  must,  therefore,  be 
spread  over  a  four-year  period.  The  user  in  these  cases  inputs  an 
implementation  schedule  that  gives  the  total  percentage  of  the  new 
system  implemented  by  that  year.  A  typical  schedule  might  be  15 
percent  by  1980,  25  percent  by  1981,  65  percent  by  1982,  85  percent 
by  1983,  100  percent  by  1984.  Where  an  existing  category  of  facili¬ 
ties  is  being  replaced,  another  set  of  percentages  can  be  used  to 
compute  the  burden  of  maintaining  the  old  system  during  the  replace¬ 
ment  period.  These  data  for  transition  from  an  older  to  a  modern¬ 
ized  facility  are  directly  applied  to  the  cost  model  without  affect¬ 
ing  the  baseline  data. 

Operations  and  Maintenance.  O&M  costs  are  incurred  to  maintain  the 
present  communications  facilities  in  operational  status.  These 
costs  include  labor  costs  for  communications  technicians,  inventory, 
spares  provisioning  and,  to  some  extent,  replacement  costs.  The 
O&M  costs  will  increase  according  to  an  inflation  rate  specified  by 
the  model  user.  Periodic  increases  in  the  O&M  cost  for  particular 
facility  types  can  be  programmed  by  the  user  to  reflect  the  burden 
of  maintaining  obsolescent  equipment.  New  facilities,  on  the  other 
hand,  could  experience  a  significant  decrease  in  O&M  costs  if  a 
transition  is  made  from  old  vacuum  tube  technology  to  new  solid- 
scate  technology  equipment,  and  these  costs  reductions  can  also  be 
specified  by  the  model  user. 

User-Assigned  Costs.  This  category  is  used  to  reflect  special 
costs  that  are  not  manipulated  by  the  model  but  are  important  in 
the  overall  cost  analysis  being  performed.  User-assigned  costs 
could,  for  example,  reflect  costs  to  the  airlines  to  install 
avionics  equipment  on  aircraft  that  operate  in  conjunction  with 
a  new  FAA  system  such  as  DABS.  Estimates  of  these  costs  are  input 
by  the  user  at  run  time  and  are  directly  added  to  the  output  of  the 
cost  model  computations. 

Required  Variables,  in  addition  to  these  general  model  inputs, 
there  are  a  number  of  specific  variables  that  must  be  defined  for 
each  run: 

••  Inflation,  discounting,  and  growth  rate 
••  Period  of  analysis,  e.g.,  1980  through  1989 
••  Type  of  output  reports  required  (see  Section  2.4) 
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•  Other  Variables.  Additional  specific  variables  that  can  be  defined 
for  each  run  are: 

*  *  Annual  increase  in  IFR  aircraft  operations 

• •  Annual  increase  in  VFR  aircraft  operations 

••  Type  of  tariff  to  use  for  pricing  point-to-point  circuits 
(Telpak,  private  line,  microwave,  satellite,  other) 

••  Number  of  switches  and  type  of  circuits  to  be  switched  (voice, 
radio,  or  data) 

• •  Grade  of  service  to  be  used  in  switched  system 
• •  Changes  to  nominal  F&E  costs 
• •  Changes  to  nominal  O&M  costs 

• •  Changes  to  percentage  allocations  for  communications 
• •  Changes  to  circuit  utilization  estimates 
• •  Level  of  automation 

This  information  is  keypunched  for  input  at  the  beginning 
of  each  run.  The  specific  data  formats  are  defined  in  the 
User's  Guide. 

2.4  MODEL  OUTPUTS 

The  model  considers  64  different  facility  types  in  computing  costs. 
These  costs  are  summed  and  assigned  to  one  of  five  categories  for  each 
analysis  year: 

•  Non-Recurring  Facilities  and  Equipment  Costs 

•  Recurring  FAA  Operations  and  Maintenance  Costs 

•  Annual  Leased-Circuit  Costs 

•  Annual  Leased-Equipment  Costs 

•  User-Assigned  Costs 

All  costs  are  converted  to  1979  dollars  on  the  basis  of  the  inflation 
rate  specified.  In  addition,  the  model  computes  the  net  present  value  of 
all  expenditures  for  each  year  and  the  cumulative  cost  from  year  to  year. 
The  user  has  eight  output  options  to  select  the  quantity  of  data  printed 
after  each  run: 

•  Detailed  Cost  Summary 

•  Short  Summary 

•  F&E'  Data  Base 

•  O&M  Data  Base 

•  Tariff  Schedules 

'2-8 


•  Operational  Units 

•  Circuit  Array  Data 

•  Main  Array  Data 

The  User's  Guide  presents  detailed  examples  of  all  FAA  communications 
cost  model  outputs. 

When  intepreting  these  reports,  the  user  should  keep  in  mind  that  the 
model  has  been  designed  for  order-of -magnitude  cost  estimates  at  the  na¬ 
tional  level.  By  iteratively  applying  the  model  and  changing  only  a  few 
variables,  it  is  possible  to  determine  the  relative  advantages  of  different 
alternatives  at  a  macro-economic  level.  The  same  technique  is  also  useful 
for  demonstrating  the  particular  cost  sensitivities  of  a  given  system 
concept. 


CHAPTER  THREE 


MODEL  EQUATIONS 


This  section  contains  the  equations  used  by  the  FAA  Communications 
Cost  Model.  They  are  presented  in  algebraic  form  to  facilitate  understand¬ 
ing;  they  can  be  translated  directly  into  the  FORTRAN  Code  used  in  the 
program.  All  symbols  used  are  defined  in  Chapter  Five. 

The  rationale  underlying  the  model  assumes  that  FAA  ATC  services  are 
supported  by  ATC  operational  units  that  in  turn  are  serviced  by  various 
types  of  comnunications  facilities  and  circuits.  The  ATC  operational  units 
can  be  categorized  into  five  types: 

•  En- Route  Sectors 

•  Air  Traffic  Control  Towers 

•  Terminal  Radar  Facilities 

•  Flight  Service  Stations  (FSSs) 

•  Air  Route  Traffic  Control  Centers  (ARTCCs) 

To  perform  the  communications  associated  with  their  operational  mis¬ 
sion,  the  operational  units  draw  upon  an  array  of  64  different  types  of 
facilities  and  their  supporting  circuits.  Most  of  these  facilities  and 
circuits  service  one  or  more  of  the  operational  unit  types.  Expansion  (or 
contraction)  of  the  number  of  operational  units  requiring  communications 
facility  services  may  result  in  a  related  expansion  or  contraction  of  some 
portion  of  the  existing  communications  facilities  and/or  the  creation  of 
entirely  new  facilities  and  circuits.  Changes  in  the  traffic  environment, 
introduction  of  new  ATC  services,  advances  in  communication  technology, 
etc.,  will  affect  the  growth  of  the  operational  units,  the  development  of 
the  communications  facilities,  and  the  cost  of  the  facilities  and  circuits. 

As  shown  in  Figure  3-1,  the  process  described  above  is  implemented  by 
organizing  the  model  into  seven  modules  that  operate  on  the  inputs  supplied 
at  run  time  and  a  resident  data  base.  The  internal  data  base  contains  nom¬ 
inal  values  for  all  cost  parameters  required  by  the  various  modules.  The 
user  may  alter  any  of  these  values  at  run  time  without  having  to  recompile 
the  program.  The  input  module  accepts  the  run  time  inputs  supplied  by  the 
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Figure  3-1.  BASIC  COMMUNICATIONS  MODEL  STRUCTURE 


user  in  the  form  of  a  high-level  description  of  the  environment  and  the 

system  alternative  to  be  modeled.  This  module  translates  the  input  into 

the  parameters  and  terms  on  which  the  costing  modules  operate.  The  New 

System  Growth  and  Facility  Requirements  Module  accounts  for  the  expansion 

j  or  contraction  of  operational  units  in  accordance  with  traffic  growth, 

|  automation,  and  FAA  policy  changes.  The  four  costing  modules  (F&E,  O&M, 

|  circuit,  and  lease  costs)  separately  compute  the  costs  for  new  equipment, 

| 

i 
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operations  and  maintenance  of  the  communications  equipment  plant,  the  com¬ 
munications  network  costs,  and  any  leased  communications  equipment.  The 
output  module  combines  and  categorizes  the  cost  data  and  prepares  cost 
reports  as  described  in  Section  2.4. 

The  technique  for  computing  total  cost  involves  adding  together  all 
incremental  costs  resulting  from  either  changes  to  the  baseline  system  or 
system  growth.  The  generalized  equation  for  FsE  costs  is  given  by  the 
following  equation: 

F&E  Cost  =  (Number  of  facilities  added  in  year  y)  (Cost  per  facility) 

+  E  (Number  of  operational  units  added  in  year  y)  (Facility 
cost  due  to  expansion) 

This  equation  considers  two  factors  in  computing  F&E  costs: 

•  The  number  of  additional  facilities  required 

•  Changes  in  facility  cost  due  to  expansion 

The  first  part  of  the  equation  computes  the  basic  cost  for  all  new  facili¬ 
ties.  In  many  cases,  however,  facilities  are  upgraded  to  handle  additional 
traffic.  Therefore,  the  second  part  of  the  equation  computes  the  cost  of 
all  expansions  to  existing  facilities.  The  formulation  thus  accounts  for 
increases  in  quantity  as  well  as  complexity  within  the  system.  Only  an 
incremental  cost  for  new  facilities  is  computed;  it  is  added  to  the  base¬ 
line  cost. 

A  similar  equation  is  used  for  computing  O&M  costs: 

O&M  Cost  =  (Number  of  operational  units  in  year  y)  (Cost  per  opera¬ 
tional  unit)  +  L  (Number  of  operational  units  added  since 
1979)  (O&M  cost  due  to  expansion) 

This  equation  accounts  for  the  total  O&M  cost,  including  increases  in 
the  number  of  facilities  that  need  to  be  maintained  as  well  as  increases 
in  the  cost  of  maintenance  due  to  increased  complexity. 

Circuit  costs  are  computed  in  a  somewhat  different  manner.  The  number 
of  circuits  required  is  primarily  a  function  of  the  types  of  facilities 
that  must  be  connected.  The  cost  per  circuit,  however,  depends  on  circuit 
length.  The  following  equation  is  a  generalized  form  of  the  circuit  cost 
algorithm: 

Ckt  Cost  =  [2  (Cost  per  circuit  end)  +  (Cost  per  mile)  (Average  length 
of  Ckt)]{E  (Number  of  Ckts  per  facility)  (Number  of 
facilities)} 
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The  actual  algorithms  used  in  the  model  are  more  complicated  than  the 
generalized  equations  given  here.  Factors  such  as  inflation,  implementation 
schedules,  circuit  types,  and  tariff  types  are  dealt  with  in  detail  as 
described  later  in  this  section.  The  model  uses  these  equations  and  param¬ 
eters  to  compute  costs  one  year  at  a  time  until  the  years  of  interest  are 
reached.  The  model  is  thus  able  to  compute  annual  as  well  as  cumulative 
costs  for  any  period  between  1980  and  2008. 

The  remainder  of  this  section  describes  the  various  program  modules 
in  greater  detail. 


3.1  INPUT  MODULE 

The  input  module  translates  a  high-level  user  description  of  the  FAA 
network  into  parameters  that  the  various  other  modules  can  use.  This  is 
accomplished  through  appropriate  changes  to  the  baseline  system  data  base 
and  the  construction  of  special  requirements  matrices  that  identify  sub¬ 
sequent  modifications  to  the  data  base  for  each  year  of  analysis .  Inputs 
that  affect  communications  costs  are  considered  to  fall  into  one  of  the 
following  categories: 

•  Technological  changes 

•  Operational  changes 

•  Automation 

•  Transitional  changes 

The  first  two  types  are  handled  by  modifying  the  baseline  system  F&E 
and  O&M  cost  parameters  in  the  F&E  and  O&M  cost  data  base.  Remote  Center 
Air/Ground  Communications  Facility  (RCAG)  modernization,  for  instance, 
would  probably  consist  of  replacing  vacuum  tube  equipment  with  more  reliable 
solid-state  equipment.  This  would  necessitate  a  change  in  the  basic  RCAG 
facility  cost  with  a  reduction  in  the  baseline  O&M  cost  due  to  greater 
reliability.  The  new  data  are  entered  at  run  time  by  the  model  user. 
Operational  changes  might  be  represented  by  the  deletion  of  one  equipment 
type  or  the  addition  of  a  new  type.  In  either  case,  the  user  must  estimate 
the  various  cost  factors  required  by  the  model  for  each  facility  type  that 
must  be  changed  or  added  and  input  the  number  of  such  facilities  required. 

Automation  will  affect  the  appropriate  operational  unit  module  by 
reducing  the  total  number  of  operational  units .required  according  to  user- 
specified  inputs. 

The  last  type  of  input  concerns  transitional  changes  to  the  system. 

For  each  affected  facility  type,  a  special  matrix  is  completed  that  indi¬ 
cates  the  rate  at  which  the  old  system  is  to  be  phased  out  and  the  new 
system  is  to  be  phased  in.  The  rates  are  specified  in  terms  of  the  per¬ 
centage  of  the  old  equipment  that  must  be  decommissioned  in  each  year  and 
the  percentage  of  the  system  that  is  to  be  replaced  by  new  equipment.  Any 
desired  level  of  redundancy  can  thus  be  specified  by  the  model  user  for 
any  period  of  time. 
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3.2  NEW  SYSTEMS  GROWTH  AND  FACILITY  REQUIREMENTS  MODULE 
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This  module  computes  the  number  of  ATC  operational  facilities  that 
will  be  required  to  accommodate  estimated  future  aircraft  traffic  levels. 
ATC  operational  facilities  are  those  facilities  that  are  required  to  pro¬ 
vide  air  traffic  services  for  en-route  traffic,  terminal  area  traffic,  and 
flight  advisory  services. 

Five  types  of  operational  facilities  have  been  defined: 

•  En- Route  Sectors 

•  Air  Traffic  Control  Towers 

•  Terminal  Radar  Facilities 

•  Flight  Service  Stations 

•  Air  Route  Traffic  Control  Centers 

Most  facilities,  equipment,  and  circuits  vary  with  the  number  and  types  of 
ATC  operational  facilities.  The  following  subsections  describe  the  algo¬ 
rithms  used  to  predict  each  of  the  ATC  operational  facilities  as  a  function 
of  the  amount  and  type  of  forecast  traffic.  All  algorithms  are  formulated 
from  national  averages,  not  instantaneous  airborne  counts  at  a  particular 
region  or  sector.  This  is  consistent  with  the  philosophy  that  the  model  is 
to  be  used  as  a  planning  tool  to  address  broad,  national-level  issues. 

Data  were  obtained  from  two  sources.  Forecasts  of  IFR  traffic,  air¬ 
port  operations,  instrument  operations,  and  flight  services  were  obtained 
from  official  FAA  forecasts  published  by  the  Office  of  Aviation  Policy 
(AVP-120) .  Forecasts  for  the  five  operational  units  were  obtained  from 
the  FAA  Air  Traffic  Service  (AAT-110) . 

3.2.1  En-Route  Sectors 


The  number  of  en-route  sectors  is  determined  as  a  function  of  the  num¬ 
ber  of  IFR  operations  at  ARTCCs  and  the  sector  productivity  factor.  This 
relationship  was  determined  from  information  provided  by  AAT  personnel  and 
FAA  forecasts  of  air  traffic  and  en-route  sectors.  The  total  number  of 
en-route  sectors  was  plotted  as  a  function  of  the  number  of  IFR  aircraft 
handled  at  ARTCCs. 

The  FAA  has  prepared  a  sector  forecast  through  1983  (Figure  3-2)  as  a 
function  of  the  expected  increases  in  en-route  IFR  flights.  From  an  analy¬ 
sis  of  the  data,  the  following  log-linear  regression  equation  was  developed 
for  computing  the  total  number  of  sectors. 

Number  of  Sectors  =  [491.1  Loge  ( IFRTFK)  -  926.43]  /  AUTOSE  (1) 


where 


IFRTFK  =  en-route  IFR  aircraft  traffic,  in  millions  of  aircraft  handled 
per  year. 
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AUTOSE  =  sector  productivity  factor.  This  is  defined  as  the  ratio  of 
the  average  sector  size  in  the  scenario  under  consideration 
to  the  average  sector  size  in  the  current  NAS.  This  factor 
has  a  nominal  value  of  1.  Values  greater  than  1  imply  that 
for  whatever  reason,  a  controller  can  handle  more  traffic  per 
sector  than  is  currently  the  case. 

This  equation  is  presented  in  Figure  3-2  (assuming  AUTOSE  =  1)  to  demon¬ 
strate  its  agreement  with  the  present  forecast  and  its  extrapolation  to 
further  increases  in  IFR  traffic. 

To  determine  the  number  of  sectors  that  will  be  in  operation  through 
the  year  2008,  it  is  necessary  to  forecast  the  en-route  IFR  traffic  through 
the  year  2008.  A  linear  regression  equation  has  been  developed  that  closely 
matches  the  data  available  from  official  FAA  air  traffic  forecasts.  It  has 
been  extrapolated  to  develop  estimates  of  IFR  traffic  beyond  1991.  The 
equation  is  shown  below  and  plotted  in  Figure  3-3.  The  factor  of  27.75  in 
the  equation  below  is  the  base  year  value;  it  must  be  subtracted  before  the 
growth  factor  can  be  applied,  and  then  re-added. 

IFRTFK  =  f (1. 2505  (YR  -  1900)  -  69.204)  -  27.75]  IFRGRO  +  27.75  (2) 

where 

IFRTFK  =  En-route  IFR  traffic,  in  millions  of  aircraft  handled  per 
year 

YR  =  Year  under  consideration 

IFRGRO  =  Variation  in  IFR  traffic  growth.  This  is  a  factor,  nominally 
1,  which  is  applied  to  the  change  of  traffic  over  the  nominal 
forecast.  A  value  of  1.5  for  example,  would  increase  the  IFR 
yearly  traffic  growth  by  50  percent  over  the  yearly  growth 
in  the  nominal  forecast. 

If  Equations  1  and  2  are  combined,  the  results  provide  a  projection  of  the 
increase  in  sectors  through  the  year  2008,  which  can  be  used  to  determine 
the  resulting  increases  in  cost  in  the  baseline  scenario.  These  algorithms 
describe  the  number  of  en-route  sectors  that  will  be  required  to  handle  a 
given  amount  of  en-route  IFR  aircraft  traffic.  The  relationships  reflect 
the  present  controller  capability  for  handling  peak  aircraft  traffic.  The 
relationships  describe  the  national  aggregate  of  sectors  as  a  function  of 
the  national  aggregate  of  IFR  aircraft  handled.  The  model  user  may  increase 
or  decrease  the  projected  IFR  growth  rate  by  entering  a  number  other  than 
one  for  AUTOSE.  Changes  in  the  controller  capability  for  handling  peak 
aircraft  traffic  (due  to  automation,  for  example)  can  also  be  incorporated 
by  scaling  the  total  number  of  sectors  with  the  factor  AUTOSE.  Thus  a 
productivity  increase  of  25  percent  (AUTOSE  =  1.25)  would  reduce  the  num¬ 
ber  of  sector  positions  required  by  20  percent. 
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3.2.2  Air  Traffic  Control  Towers 


All  FAA-controlled  airports  have  towers.  For  the  busiest  airports, 
terminal  radar  approach  control  (TRACON)  facilities  are  provided  when  cer¬ 
tain  traffic  levels  are  reached. 

The  FAA  forecasts  that  the  number  of  towers  will  increase  an  average 
of  two  per  year  as  shwon  in  Figure  3-4.  Although  projected  increases  in 
air  traffic  would  indicate  that  more  than  two  airports  per  year  will  become 
qualified  for  tower  service,  budgetary  considerations  will  limit  the  actual 


Figure  3-2.  PROJECTED  SECTOR  GROWTH  AS  A  FUNCTION  OF 
IFR  TRAFFIC 


IFR  Aircraft  Handled  per  Year  (Millions) 


Figure  3-3.  PROJECTED  GROWTH  IN  IFR  TRAFFIC 


Figure  3-4.  PROJECTED  GROWTH  IN  TOWERS  AS  A  FUNCTION 
OF  AIRPORT  OPERATIONS 

number  of  new  towers  to  two  per  year.  The  following  equation  represents 
this  forecast: 

ATCT  =  270  +  2(YR  -  1900)  (3) 


where 


YR  =  Year  under  consideration 

The  FAA  forecast  of  total  local  and  itinerant  airport  operations  is 
indicated  in  Figure  3-5.  An  analysis  of  the  forecast  data  provides  the 
following  regression  equation,  which  can  be  ased  to  extrapolate  the  fore¬ 
cast  through  the  year  2000  [again,  the  70.46  figure  represents  the  base 
(1979)  figure] : 

APTOPN  =  [(306.72  -  18429/(YR  -  1900))  -  70.46]  APOGRO  +  70.46  (4) 

where 

APTOPN  =  Total  local  and  itinerant  airport  operations,  in  millions 
per  year 
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Figure  3-5.  PROJECTED  GROWTH  OF  TOTAL  ITINERANT  PLUS 
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YR  =  Year  under  consideration 

APOGRO  =  Growth  factor  for  airport  operations.  This  is  handled  the 
same  way  as  IFRGRO. 

Equations  3  and  4  are  combined  in  the  baseline  scenario  to  determine  the 
increase  in  the  number  of  towers  and  the  resulting  increase  in  communnica- 
tions  costs  associated  with  these  towers. 

3-2.3  Terminal  Radar  Facilities  (Airport  Surveillance  Radar) 

When  airport  traffic  loads  become  heavy,  and  particularly  when  the 
number  of  instrument  operations  at  an  airport  becomes  significantly  large, 
the  airport  tower  will  be  provided  an  airport  surveillance  radar  (ASR) . 
Some  of  the  busiest  airports  with  ASRs  are  designated  as  TRACONs.  The  FAA 
does  not  specifically  forecast  ASRs  and  TRACONs  as  a  functi  .n  of  airport 
operations,  but  it  is  assumed  that  increases  in  airport  instrument  opera¬ 
tions  can  be  used  to  forecast  increases  in  ASRs  and  TRACONs.  There  are 
currently  157  ASRs  and  45  TRACONs.  Therefore,  the  following  equations 
are  used  in  the  baseline  scenario: 

Number  of  ASRs  =  (123.3  +  INSTOP)  /  AUTOTW  (5; 
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Number  of  TRACONs  =  28.2  +  0.5  INSTOP 


(6) 


where 


INSTOP  =  Number  of  airport  instrument  operations,  in  million  per 
year 

AUTOTW  =  Tower  productivity  factor.  This  represents  a  factor  which, 
if  its  value  were  greater  than  one,  would  imply  that  fewer 
towers  are  needed  to  cover  the  same  ATC  workload. 

These  equations  are  presented  in  Figure  3-6  for  AUTOTW  =  1.  The  number  of 
airport  instrument  operations  can  be  extrapolated  from  FAA  forecast  data 
by  using  the  following  equation: 

INSTOP  =  {  [2. 447 e  t°*0347<YR  "  1900)]  _  33>64}  IN0GR0  +  33. 64  (7) 


where 


INSTOP  =  Number  of  airport  instrument  operations,  in  millions  per 
year 

YR  =  Year  under  consideration 
INOGRO  =  Growth  factor  for  instrument  operations 


(Millions  per  Year) 

Figure  3-6.  PROJECTED  NUMBER  OF  ASRs  AND  TRACONs  AS  A 
FUNCTION  OF  INSTRUMENT  OPERATIONS 
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Figure  3-7  shows  the  relationship  between  the  FAA  forecast  and  the  derived 
equation . 
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Figure  3-7.  PROJECTED  GROWTH  IN  INSTRUMENT  OPERATIONS 
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3.2.4  Flight  Service  Stations 

There  are  no  plans  to  increase  the  number  of  Flight  Service  Stations, 
and  it  is  likely  that  the  number  will  decrease  to  achieve  cost  reductions 
through  consolidation.  However,  the  exact  rate  of  consolidation  was  not 
identified.  Therefore,  in  the  baseline  it  is  assumed  that  the  number  of 
FSSs  will  remain  fixed  and  that  the  stations  will  have  to  be  expanded  to 
handle  the  expected  increase  in  FSS  operations .  The  projected  growth  in 
FSS  operations  is  shown  in  Figure  3-8.  The  following  equation  can  be  used 
to  extrapolate  the  data  through  the  year  2000: 

FLTSVC  =  [{365.466  -  23415. 4/YR)  -  67.80]  FSVGRO  +  67.80  (8) 

where 

FLTSVC  =  Total  Flight  Services,  in  millions  per  year 
YR  =  Year  under  consideration 

FSVGRO  =  Variation  in  FSS  growth  rate.  This  factor  is  handled  in  the 
same  manner  as  IFRGRO 
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Figure  3-8.  PROJECTED  GROWTH  IN  LEASED  CIRCUITS 


3.2.5  Air  Route  Traffic  Control  Centers 

The  number  of  ARTCCs  is  treated  in  the  model  as  a  constant  that  can 
be  changed  by  the  user  at  run  time  if  further  communication  scenarios  are 
analyzed.  However,  the  number  of  existing  ARTCCs  may  be  varied  as  a  func¬ 
tion  of  the  total  ARTCC  productivity  (AUTOCN) . 

Number  of  ARTCCs  =»  (Number  of  ARTCC  in  baseline)  /  AUTOCN  (9) 

where 

AOTOCN  represents  a  productivity  factor  which,  if  its  value  were 
greater  than  one,  would  imply  that  fewer  ARTCCs  are  necessary  for 
the  same  ATC  workload 


3.3  FACILITIES  AND  EQUIPMENT  COST  MODULE 

The  F&E  cost  algorithm  assumes  that  the  annual  cost  burden  in  any 
given  year  results  only  from  the  addition  of  new  equipment  installed  dur¬ 
ing  that  year,  with  the  full  cost  of  the  new  equipment  charged  off  during 
the  year  (i.e.,  immediate  full  depreciation).  Sunk  costs  for  existing 
equipment  are  not  included.  Communications  facilities  are  categorized 
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into  the  64  different  types  of  facilities  identified  in  the  Present 
System  Definition  report.* 

The  growth  of  a  given  type  of  communications  facility  is  generalized 
as  consisting  of  two  fundamental  components.  The  first  is  the  creation  of 
additional  basic  facilities,  where  a  basic  facility  is  defined  as  the 
site,  the  structures  required  to  house  the  communications  equipment,  and 
the  minimum  communications  equipment  required  to  operate  the  site.  For 
example,  an  RCAG  with  four  channels  would  be  considered  to  be  the  basic 
RCAG  facility.  A  certain  minimum  number  of  RCAGs  are  required  to  provide 
coverage  of  the  national  airspace.  The  second  component  of  growth  is  t’.e 
expansion  of  the  capability  of  an  existing  basic  facility  by  increasing  its 
complexity  and  its  amount  of  communications  equipment.  Expanding  an  RCAG 
from  four  to  eight  channels  would  be  an  example  of  this  kind  of  growth. 

The  facilities  equipment  expansion  component  generally  can  be  viewed 
as  sensitive  to  the  increase  in  the  number  of  operational  units  of  each 
type  that  the  facility  must  serve.  The  general  formulation  therefore  must 
have  terms  describing  expansion  of  each  operational  unit  type.  To  use  the 
RCAG  example,  an  existing  RCAG  facility  will  be  expanded  when  the  number 
of  sectors  it  serves  increases  beyond  the  number  the  basic  facility  is 
designed  to  serve.  Within  an  RCAG  facility,  expansion  is  achieved  by 
adding  more  transmitters ,  receivers,  etc.,  to  the  facility  but  not  addi¬ 
tional  buildings  or  other  support  equipment.  Since  proliferation  of  other 
operational  unit  types  such  as  towers  or  FSSs  will  not  affect  RCAG  expan¬ 
sion,  the  general  formulation  when  applied  to  the  RCAG  will  have  zero 
values  for  the  expansion  sensitivity  terms  associated  with  these  other 
operational  unit  types. 

Each  type  of  communications  facility  can  be  expected  to  have  its  own 
unique  array  of  sensitivities.  Since  these  will  be  stored  in  a  general 
matrix  and  applied,  as  appropriate,  to  a  general  input  scenario  that  is 
evaluated  element-by-element,  it  can  be  seen  that  any  assumption  can  be 
easily  modified. 

In  accordance  with  the  foregoing,  a  general  formulation  for  the  F&E 
cost  associated  with  type  j  communications  facilities  occurring  in  year  y 
can  be  written  as  given  in  the  following  equations: 


I.  y  <  Tj  (before  conversion) 

C.,=R...  [U...-U..  , J  H. 

3 (y)  old]  ] (y)  ] (y-1)  ] 


+  £  [x.  -  X.,  ..] 

3xi  i(y)  i(y-D 


Cost  of  adding  facilities 
in  current  year  (10) 

Cost  of  upgrading  existing 
facilities  in  current  year 


*A  Study  of  the  Economic  Impact  of  Selected  Communications  Alternatives 
Present  System  Definition ,  ARINC  Research  Publication  1339-01-1-1723, 
March  1978,  prepared  under  Contract  DOT-FAA77WA-4018. 


where  13./  \  =  U .  .  .  +  E  * [x  —  X .  .  ] 

j(y)  3(0)  3xi  i(y)  1(0)  J 


Number  of  facilities 
required  in  current 
year  (11) 


The  terms  used  in  these  and  the  following  equations  are  defined  in  Table 
3-1. 

Model  formulation  also  includes  provisions  for  representing  the  con¬ 
version  of  a  given  type  of  communications  facility  from  its  present  con¬ 
figuration  to  a  modernized  version  presumably  representing  advanced  cost¬ 
saving  technology.  The  F&E  cost  algorithm  accommodates  this  transition 
by  using  two  equations:  one,  describing  the  old  system,  is  applied  if  the 
.year  being  analyzed  is  before  the  specified  transition  year;  the  other  is 
applied  if  the  year  is  the  same  as  or  follows  the  transition  year.  A 
fundamental  assumption  is  that  all  new  equipment  or  sites  added  after 
transition  begins  will  be  of  the  modernized  (new)  type. 

The  process  of  transition  is  described  independently  for  each  type  of 
communications  facility  by  using  parameters  defined  in  Table  3-1. 

In  this  formulation,  transition  can  occur  at  different  rates  and  begin 
in  different  years  for  each  type  of  communications  facility.  Also,  where 
a  communications  facility  serves  more  than  one  type  of  operational  unit, 
transition  for  the  portions  of  the  facility  associated  with  different  units 
can  occur  at  different  rates.  For  example,  those  RTRs  associated  with 
towers  can  be  modernized  at  a  slower  rate  than  those  associated  with 
TRACONs.  Also,  by  specifying  phase-out  factors  and  switchover  factors 
separately,  it  is  possible  to  retain  portions  of  the  old  equipment  as  a 
backup  for  any  arbitrary  period  of  time. 

The  formulation  for  the  time  periods  beyond  transition  is  given  by 
equations  listed  below.  In  addition  to  accounting  for  new  facilities  and 
facility  expansion  due  to  the  growth  in  operational  units,  this  equation 
contains  additional  terms  that  account  for  the  replacement  of  outmoded 
facilities  and  equipment  by  modernized  facilities  and  equipment  purchased 
during  the  year  of  analysis,  y. 


II.  Y  >_  Tj  (After  conversion) 

c . ,  .  =  R  .  [0 . .  .  -  0 .  ,  , , ]  H , 
j (y)  new3  3 (y)  3 (y-1) J  j 


-  fnewj  r 

£  3xi  Ui(y)  Xi  (y-1) J 


Cost  of  adding  new 
facilities  in  current 


Cost  of  upgrading 
facilities  in  current 
year  (12) 


+  p  fp  -  p  In  h  Cost  of  replacing  old 

•  newj  L  newj(y)  new j (y-1) J  j(Tj)Hj  faciiities  with  new  in 

current  year 
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Table 

3-1.  DEFINITIONS  OF  VARIABLES  USED  IN  OfiM  AND  FSE  EQUATIONS 

cj<y> 

Annual  conmunications  cost  in  year  y  for  facility  type  j 

Roldj 

Basic  facility  costs  per  site  for  old  type  of  facility  j 

R  . 
newj 

Basic  facility  costs  per  site  for  new  type  of  facility  j 

V* 

xi 

Increase  in  cost  per  unit  of  old  facility  type  j  resulting  from 
the  addition  of  a  unit  of  facility  i 

_fnewi 

3  . 

XI 

Increase  in  cost  per  unit  of  new  facility  type  j  resulting  from 
the  addition  of  a  unit  of  facility  i 

y 

Year 

Ti 

Year  in  which  transition  begins  for  facility  type  j 

°j(y) 

Number  of  type  j  facility  sites  in  year  y 

Xi(o) 

Base  number  of  type  j  facility  sites 

<y> 

3xi 

Basic  COMM  facility  growth  coefficient  describing  influence  of 
operational  unit  type  i  on  the  number  of  facilities  of  type  j 

p 

newj  (y) 

Fraction  of  all  old  equipment  for  facility  type  j  that  has  been 
replaced  by  new  equipment  by  y  years  after  transition  begins; 
applies  to  F&E  costs  only 

Soldj (y) 

Fraction  of  all  old  equipment  for  facility  type  j  that  still 
remains  y  years  after  transition  begins;  applies  to  O&M  costs 
only 

Snewj (y) 

Fraction  of  all  old  equipment  for  facility  type  j  that  is 
replaced  by  new  equipment  by  y  years  after  transition  begins; 
applies  to  O&M  only 

H. 

3 

Percentage  communication  for  F&E  (facility  type  j) 

Ki 

Percentage  communication  for  O&M  (facility  type  j) 

Aoldj 

Fixed  (nonlabor)  cost  for  old  type  of  facility  j 

Anewj 

Fixed  (nonlabor)  cost  for  new  type  of  facility  j 

w 

wk 

Wage  rate  for  labor  category  k 

"oldjk 

Hours  of  maintenance  of  labor  category  k  required  to  service  the 
old  type  of  facility  j 

Hnewjk 

Hours  of  maintenance  of  labor  category  k  required  to  service  the 
new  type  of  facility  j 

I 


gfrri  DIWfMiiSSW*** 


tk 


3.4  OPERATIONS  AND  MAINTENANCE  COST  MODULE 

The  O&M  cost  algorithm  follows  the  same  general  form  as  the  F&E  cost 
algorithm.  O&M  costs  are  the  product  of  the  number  of  facilities  (sites) 
required  and  the  cost  per  facility.  As  in  the  case  of  F&E,  the  cost  per 
facility  is  influenced  by  the  growth  of  each  type  of  operational  unit 
through  sensitivity  coefficients. 


O&M  costs  per  facility  are  inputted  in  terms  of  a  fixed  component 
plus  a  given  number  of  labor  hours.  The  labor  hours  can  be  divided  among 
as  many  as  three  labor  categories,  each  having  a  different  wage  rate. 
Thus,  O&M  costs  for  a  particular  facility  can  be  expressed  as: 


3 

Roldj  *  Aoldj  +  ^  WkRoldjk 
k*l 

3 

Rnewj  Anewj  +  WkHnewjk 

k=l 


(13) 


(14) 


If  all  the  hours  are  set  to  zero,  the  O&M  cost  will  be  modeled  as  a  con¬ 
stant,  as  was  the  case  in  previous  versions  of  the  model. 


As  with  the  F&E  case,  equation  components  were  developed  to  incorporate 
the  cost  of  both  existing  facilities  and  upgraded  facilities,  with  the 
following  resultant  equations: 


I.  y  <  Tj  (Before  conversion) 

Cj (y)  =  Roidj  uj (y)  Kj  Cost  of  existing  facilities 

+  E  8 foidi  Pity)  -  xi(o)]  Cost  of  upgraded  facilities  (15) 
^xi 

Incorporating  transition  to  a  modernized  system  requires,  as  for  the 
F&E  case,  additional  terms  and  modifications  to  the  formulation.  The 
formulation  for  transition  year  and  beyond  must  include  the  following: 

•  O&M  cost  of  all  modernized  facilities  added  to  accommodate  opera¬ 
tional  unit  growth 

•  O&M  cost  of  all  modernized  facilities  and  equipment  commissioned 
to  replace  old  facilities  and  equipment  that  existed  at  the  time 
transition  began 

•  O&M  costs  for  all  old  facilities  and  equipment  that  existed  at  the 
time  transition  began  and  that  remain  in  operation 
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The  phasing  out  of  obsolete  sites  and  equipment  and  the  switchover  to  the 
modernized  version  is  described  by  the  same  transition  parameters  used 
in  the  F&E  formulation.  The  resulting  formulation  for  describing  tran¬ 
sition  is  then  given  by  the  following  equations: 


II.  y  >  T.  (After  conversion) 

“  D 

C. (y)  =  R  .U. .  .  S  . .  .  K. 
3  new]  ] (y)  new] (y)  ] 


Cost  of  new  facilities 


+  E_^ewi[x  .  x  ] 

xi  l(y)  i(y-D 


+  l  [x.  -  x. .  .]  s  . 

3xi  i(y)  1(0)  new] (y) 


+  R  _  ..U.  .  .  S  ,  ..  .  .K. 
old]  ] (y)  old] (y)  ] 

+  j]  .  Jp.ld]  - 

3xi  i(y)  i (o) ^  oldj (y) 


Cost  of  upgrading  new 
facilities  added  since 
conversion  began  with 
new  equipment 

Cost  of  upgrading  new 
facilities  that  have 
replaced  old  facili¬ 
ties  with  new 
equipment  (16) 

Cost  of  old  facilities 

Cost  of  expanding  old 
facilities  using  old 
equipment 


3.5  CIRCUIT  COST  MODULE 

For  present  applications  it  was  not  necessary  to  develop  a  model  to 
assess  the  impact  of  a  policy  or  scenario  change  on  each  of  the  18,000 
circuits  in  the  FAA  network.  A  macroscopic  approach  of  examining  major 
circuit  groups,  each  containing  circuits  of  similar  characteristics,  will 
produce  sufficient  accuracy  for  the  purpose  of  planning.  To  accommodate 
a  broad  spectrum  of  circuit  analyses,  the  leased  circuit  network  has  been 
categorized  four  different  ways:  (1)  by  circuit  type,  (2)  by  circuit  type 
with  a  more  detailed  breakdown,  (3)  by  terminating  facility,  and  (4)  by 
function  or  use.  While  each  group  accounts  for  all  the  circuits,  the 
different  stratifications  make  it  possible  to  analyze  technology  changes 
that  affect  different  cross  sections  of  circuits.  The  user  would  select 
whichever  stratification  provides  the  best  description  of  the  types  of 
circuits  or  services  affected  in  a  particular  analysis.  Once  the  choice 
has  been  made,  the  other  three  categorizations,  for  all  practical  pur¬ 
poses,  do  not  exist.  This  is  necessary  to  prevent  double  counting  or 
overlooking  circuits. 

Whichever  of  the  four  groups  is  selected,  the  circuit  cost  algorithm 
considers  the  average  number  of  circuits  required  to  support  any  given 
facility.  Once  the  F&E  requirements  for  any  future  year  are  computed  by 
the  F&E  Cost  Module,  the  average  quantity  and  length  of  each  circuit  type 
can  be  computed.  These  data  are  then  stored  in  a  matrix  from  which  circuit 
costs  are  computed.  The  parameters  required  to  compute  circuit  costs  are 
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the  total  number  of  circuits,  the  total  circuit  mileage,  and  the  applicable 
tariff  (cost  schedule) .  These  parameters  are  discussed  individually  in  the 
following  paragraphs. 

The  total  quantity  of  circuits  depends  on  such  factors  as  the  type 
and  number  of  facilities  in  use,  the  forecast  number  of  operational  units 
required,  and  the  expected  utilization.  Each  VOR  facility,  for  example, 
requires  one  radio  circuit,  while  the  number  of  circuits  between  centers 
and  RCAGs  is  approximately  equal  to  the  number  of  sectors  because  each 
sector  controller  must  have  a  separate  communications  channel.  Utili¬ 
zation  plays  a  significant  role  in  computing  circuit  requirements  when¬ 
ever  a  group  of  circuits  is  switched.  Public  telephone  lines  into  FSSs 
are  an  example  of  circuits  that  might  be  switched.  The  estimated  utili¬ 
zation  of  such  circuits  during  the  busy  hour  is  used  to  compute  the 
number  of  circuits  required  when  such  circuits  are  switched. 

Average  circuit  length  is  used  to  compute  the  total  mileage  once  the 
quantity  of  each  circuit  type  is  known.  In  certain  instances,  however,  it 
is  necessary  to  modify  the  average  length.  If  the  number  of  FSSs  were  to 
decrease  as  a  result  of  consolidation,  the  average  distance  between  towers 
and  FSSs  would  increase.  For  the  purposes  of  this  model,  average  length 
is  assumed  to  be  inversely  proportional  to  the  square  root  of  the  number  of 
facilities.  (See  James  Martin,  Systems  Analysis  for  Data  Transmissions,  pp. 
739-763.)  Equations  were  derived  to  incorporate  the  effect  of  changes  in 
average  circuit  length  due  to  changes  in  the  overall  number  of  FSS  and  ARTCC 
locations. 

Average  length  factor  of  all  FSS  circuits  (RTFSS)  is: 

RTFSS  =  \/(FSSs  in  base  year)  /  (FSSs  in  present  year)  (17) 

Average  length  factor  of  all  tower  circuits  (RTTWR) 

RTTWR  =  \/(Tower  in  base  year)  /  (Towers  in  present  year)  (18) 

Average  length  factor  of  all  ARTCC  circuits  (RTCTR): 

RTCTR  =  V(ARTCCs  in  base  year)  /  (ARTCCs  in  present  year)  (19) 

Since  the  utilization,  quantity,  and  average  length  of  each  circuit 
type  must  be  separately  computed  and  stored  in  a  matrix,  a  generalized 
formula  is  not  used  in  the  circuit  cost  module.  A  separate  equation  is  used 
for  each  of  the  circuit  categories.  In  some  instances,  circuits  may  not  be 
associated  with  a  specific  facility;  such  circuits  are  grouped  into  a 
miscellaneous  category  and  held  fixed  for  the  analysis  period. 

By  keeping  the  circuit  types  separate,  it  is  possible  for  the  user 
to  identify  different  tariffs  for  each  part  of  the  network.  Radio  circuits, 
for  example,  could  be  priced  as  private  lines,  data  circuits  as  satellite 
conmunication  links,  and  voice  circuits  as  Telpak.  A  further  reason  is  to 
permit  various  circuits  to  be  incorporated  into  a  switched  network,  as 
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desired.  Provisions  are  included  for  the  user  to  change  the  tariff  schedule 
or  include  new  tariffs . 


If  a  switched  system  configuration  is  specified,  the  model  will  com¬ 
pute  the  number  of  interswitch  trunks,  total  trunk  length,  number  of  local 
distribution  circuits,  and  cost  of  the  switching  equipment.  Average  cir¬ 
cuit  length  for  the  switched  system  will  be  derived  from  the  number  of 
switches  and  number  of  facilities  specified.  The  final  step  is  to  compute 
the  interchange  (IXC)  cost  for  both  switched  and  nonswitched  circuits. 

The  following  subsections  describe  the  characteristics  used  to  compute 
circuit  costs  within  each  circuit  group.  In  the  computer  program,  the  length 
and  quantities  are  contained  in  the  switching  array  whose  columns  are  defined 
in  Table  5-8.  There  is  a  straightforward  correspondence  between  the  FORTRAN 
code  and  the  equations  described  below  for  each  of  the  circuit  categories. 

3.5.1  General  Characteristics 


FAA  operating  personnel  need  the  ability  to  communicate  in  order  to 
coordinate  activities  associated  with  ATC  services.  In  addition,  computer- 
to-computer  communication  is  necessary  to  expedite  the  handling  of  the 
various  types  of  information  through  the  ATC  system.  These  needs  generate 
a  demand  for  voice  grade  and  data  circuits.  As  a  rule,  the  addition  of  new 
operational  units  results  in  a  general  requirement  for  new  circuits  to  pro¬ 
vide  the  same  coordination  function,  while  expansion  of  service  at  any 
facility  usually  results  in  an  increase  in  the  number  of  circuits  between 
that  facility  and  any  others  with  which  it  must  communicate. 

Figure  3-9  shows  the  predicted  growth  of  all  FAA  leased  circuits  as  a 
result  of  nominal  baseline  facility  expansion  through  1990.  The  data  for 
1979  are  derived  from  the  leased  circuit  data  base  maintained  by  the 
Transportation  System  Center  in  Cambridge,  Massachusetts.  Growth  of  the 
network  is  mild  because  the  major  operating  units  are  increasing  in  number 
at  a  slow  pace.  During  the  1980s,  the  number  of  ARTCCs  is  expected  to 
remain  fixed,  FSSs  will  stay  constant  or  decline,  and  towers  will  increase 
at  the  rate  of  only  2  per  year.  Therefore,  all  the  growth  in  the  network 
is  the  result  of  growth  in  sectors  and  radars . 

From  the  information  contained  in  the  TSC  leased  circuit  data  base, 
it  was  usually  possible  to  determine  where  the  end  points  of  each  circuit 
were,  what  the  circuit  was  being  used  for,  and  what  the  current  cost. 

Table  3-2  shows  the  format  of  a  record  from  this  data  base.  On  the  basis 
of  this  information  algorithms  were  developed  to  assign  each  circuit  to 
exactly  one  category  in  each  of  the  four  circuit  groupings.  These  are 
further  described  in  the  following  four  subsections. 

3.5.2  Circuits  According  to  Type 

The  objective  of  this  grouping  was  to  categorize  the  circuits  accord¬ 
ing  to  type;  i.e.,  whether  they  were  used  for  voice,  data,  or  radio  (air/ 
ground)  communications.  Table  3-3  shows  the  logic  for  doing  so.  The 
primary  variable  used  to  divide  the  circuits  was  the  four-letter  circuit 


Table  3-2.  AVAILABLE  INFORMATION  FROM  TSC  DATA  BASE 


Identifier 

Explanation 

Values 

Circuit  number 

Integers  1-18132 

■ 

Circuit  type  code 

Four  characters 

ND 

Number  of  drops 

Integers  2  or  greater 

BPS 

Bits  per  second 

Integers  (O=not  a 
data  circuit) 

I* 

Equipment  cost  per  month 

dollars 

TMRC 

Telpak  cost  per  month 

dollars 

IMRC 

IXC  cost  per  month 

dollars 

TPKM 

Telpak  mileage 

miles 

IXCM 

IXC  mileage 

miles 

FV 

"From"  V  coordinate 

4 -digit  integer 

FH 

"From"  H  coordinate 

4-digit  integer 

FR 

"From"  FAA  region 

2-character  code 

FFC 

"From"  facility  type  code 

integers  1-303 

FLID 

"From"  facility  identifier 

'  3-character  code 

TV 

"To"  V  coordinate 

4-digit  integer 

TH 

"To"  H  coordinate 

4-digit  integer 

TR 

"To"  region 

2-character  code 

TFC 

"To"  facility  type  code 

integers,  1-303 

TLID 

"To"  facility  identifier 

3  character  code 

Table  3-3.  DETERMINATION  OF  CIRCUIT  TYPE 


Circuit  Code 

Other  Information 

Result 

AA— 

— 

Voice 

AB— 

— 

Data 

ACE- 

— 

Radio 

AC— 

Between  facilities  9  and  301 

Voice 

AC¬ 

Between  facilities  9  and  301 

Radio 

AD— 

— 

Data 

AE— 

— 

Voice 

AFA- 

— 

Voice 

AFB- 

— 

Radio 

AFD- 

— 

Radio 

AFE- 

BPS  =  0 

Voice 

AFF- 

BPS  t  0 

Data 

AFG- 

BPS  =  0 

Data 

AFG- 

BPS  +  0 

Voice 

AFJ- 

— 

Radio 

AGF- 

BPS  =  0 

Voice 

AGF- 

BPS  5*  0 

Data 

type  code.  Selection  of  a  particular  circuit  is  based  on  the  first  line, 
reading  down  the  page,  whose  characteristics  match  those  of  the  circuit 
type  indicated.  A  dash  {-)  indicates  that  any  value  or  characteristic 
will  match.  If  the  letter  code  alone  was  not  sufficient  to  classify  the 
circuit,  the  information  in  the  second  column  was  used  to  resolve  the 
difficulty. 

Once  each  circuit  was  classified  as  voice,  data,  or  radio,  the  spe¬ 
cific  category  to  which  it  would  be  assigned  could  be  determined  by  the 
"to"  and  "from"  facility  codes  (TFC  and  FFC) .  These  categories  are  shown 
in  Table  3-4.  The  miscellaneous  categories  contain  those  circuits  which 
could  not  specifically  be  identified  with  any  of  the  other  categories. 

They  are  thus  a  catch-all  for  special  situations.  Growth  of  the  quantity 
of  circuits  in  each  category  is  proportional  to  the  growth  in  one  or  more 
of  the  operational  units;  these  are  also  indicated  in  the  table.  The  last 
column  shows  which  of  the  length  adjustment  factors,  if  any,  applies  to 
each  category.  Thus,  Table  3-4  summarizes  the  categories  in  this  circuit 
group.  The  equations  used  to  forecast  circuit  growth  can  be  inferred  from 
this  table  and  the  program  listings. 
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Table  3-4.  CIRCUIT  CHARACTERISTICS  FOR  GROUPING  BY  TYPE 
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3.5.3  Circuits  According  to  Type,  with  Additional  Voice,  Data  Categories 

The  second  circuit  categorization  is  the  same  as  the  first  for  radio 
circuits.  However,  voice  and  data  are  divided  into  several  additional 
categories.  The  same  logic  is  used  to  subdivide  the  circuits  into  the 
voice/data/radio  groups  (Table  3-3) .  A  more  extensive  analysis  of  the  to/ 
from  facility  codes  was  necessary  to  obtain  this  additional  breakdown. 

Table  3-5  shows  the  categories  in  this  circuit  grouping. 

3.5.4  Circuits  According  to  Terminating  Facility 

This  grouping  is  strictly  oriented  toward  the  three  major  operational 
units.  Categorizations  are  based  solely  on  whether  the  circuit  terminates 
at  a  tower,  center,  or  FSS;  no  attempt  is  made  to  distinguish  between 
voice,  data,  and  radio  circuits. 

Table  3-6  shows  the  logic  used  to  classify  each  circuit.  It  is 
based  on  the  TFC  and  FFC  variables.  The  logic  is  symmetric  in  that  if  the 
first  two  columns  of  the  table  are  transposed,  the  same  group  of  circuits 
Still  results.  For  simplicity,  the  lower-numbered  facility  code  wj.ll 
always  be  in  the  left  column.  "Special  Circuits"  refers  to  circuits  used 
at  NAFEC,  FAA  Headquarters,  the  Aeronautical  Center,  and  similar  facilities. 
As  in  the  other  groupings,  "miscellaneous"  refers  to  those  circuits  which 
cannot  be  categorized  elsewhere. 

Table  3-7  shows  the  categories  in  this  circuit  grouping. 

3.5.5  Circuits  According  to  Function  or  Use 

The  fourth  and  final  circuit  grouping  categorizes  circuits  by  their 
service  function,  that  is,  whether  they  are  used  for  voice  or  data  com¬ 
munications,  navigation  (ILS,  DF,  VORTAC) ,  military  operations,  weather 
data,  radar,  or  special  purposes. 

The  logic  used  to  make  the  category  assignments  is  shown  in  Table  3-8. 
As  in  the  tower/center/FSS  case,  most  of  the  categorizations  are  based  on 
the  TFC  and  FFC  codes.  "Foreign  exchange"  includes  both  center  and  FSS 
Foreign  Exchange  circuits,  and  "weather"  includes  National  Weather  Service 
as  well  as  Weather  Message  Switching  Center  (WMSC)  circuits. 

Table  3-9  shows  the  categories  in  this  circuit  grouping. 

3.5.6  Switching  Calculations 

If  a  group  of  circuits  is  switched,  the  number  of  interswitch  trunks 
required  will  depend  on  the  utilization  and  required  grade  of  service  for 
that  group.  Grade  of  service  is  expressed  as  the  probability  of  a  blocked 
call  and  must  therefore  be  between  0  and  1.  A  practical  range  would  be 
about  0.001  to  0.1.  The  number  of  circuits  required  to  satisfy  a  given 
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Table  3-5.  CIRCUIT  CHARACTERISTICS  FOR  DETAILED  VOICE/DATA  GROUPING 
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- 

Table  3-6.  DETERMINATION  OF  TERMINATING 
FACILITY  CATEGORIES 

•«* 

Code  1 

Code  2 

Category 

1-6 

1-6 

Tower  to  tower 

•*  % 

1-6 

8 

Tower  to  FSS 

1-6 

9 

Tower  to  center 

1-6 

10-65 

Tower  to  military 

-»  •* 

1-6 

80 

Tower  to  weather 

1-6 

100-103 

Tower  to  VORTAC 

•* 

1-6 

81-89 

Special 

«  « 

1-6 

110 

Tower  to  foreign  exchange 

1-6 

150-157 

Tower  to  RCO 

- 

1-6 

162 

Tower  to  ILS 

1-6 

200-299 

Tower  to  weather 

* 

1-6 

— 

Tower  miscellaneous 

8 

8 

FSS  to  FSS 

8 

9 

Center  to  FSS 

•»  ». 

8 

10-65 

FSS  to  military 

8 

80 

FSS  to  weather 

8 

81-89 

Special 

8 

100-103 

FSS  to  VORTAC 

8 

110 

FSS  to  RCO 

8 

162 

FSS  to  RTR 

8 

200-299 

FSS  to  weather 

e  * 

8 

301 

FSS  to  foreign  exchange 

8 

— 

FSS  miscellaneous 

9 

9 

Center  to  center 

«  * 

9 

10-65 

Center  to  military 

9 

81-89 

Special 

-  - 

9 

130 

Center  to  RCAG 

9 

131 

Center  to  BUEC 

•  * 

9 

132 

Center  ARSR 

9 

162 

Center  to  RTR 

9 

301 

Center  to  foreign  exchange 

V  - 

9 

303 

Center  to  military  ! 

9 

— 

Center  miscellaneous 

81-89 

— 

Special 

*  • 

— 

— 

Miscellaneous 

S'* 


I 

I 

I 


grade  of  service  constraint  can  be  calculated  from  a  standard  queuing 
theory  formula: 
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Table  3-8. 

DETERMINATION  OF 

CIRCUIT  FUNCTION  OR  USE 

Code  1 

Code  2 

Other 

Category 

81-89 

— 

— 

Special 

300 

— 

— 

AUTOVON 

303 

— 

— 

AUTOVON 

10-65 

8 

— 

Military  to  FSS 

10-65 

1-6 

— 

Military  to  tower 

10-65 

9 

— 

Military  to  center 

10-65 

— 

— 

Miscellaneous  military 

200-299 

— 

— 

Weather 

164 

— 

— 

Weather 

159 

— 

— 

Weather 

80 

— 

— 

Weather 

— 

— 

NET  =  ' WMSC ' 

Weather 

— 

TLID  =  'NKA 1  or 
FLID  =  'NKA' 

Weather 

132 

— 

— 

ARSR 

50-158 

— 

— 

IDS 

100-103 

— 

— 

VORTAC 

120 

— 

— 

DF 

123-124 

— 

— 

DF 

160 

— 

— 

Miscellaneous  navigation 

163 

— 

— 

Miscellaneous  navigation 

165 

— 

— 

Miscellaneous  navigation 

301 

— 

— 

Foreign  exchange 

1-6 

9 

— 

Tower  to  center 

8 

9 

— 

FSS  to  center 

1-6 

8 

— 

FSS  to  tower 

9 

130 

— 

Center  to  RCAG 

1-6 

162 

— 

Tower  to  RTR 

9 

131 

— 

BUEC 

8 

110 

— 

FSS  to  RCO 

7 

— 

— 

Miscellaneous  communications 

1-6 

1-6 

_ 

Miscellaneous  communications 

8 

8 

— 

Miscellaneous  communications 

9 

9 

— 

Miscellaneous  communications 

— 

— 

— 

Other 

GOS  =  grade  of  service 

N  =  number  of  circuits  available 
Q  =  traffic  in  erlangs 

There  are  two  problems  with  this  equation  however:  (1)  it  is  not 
possible  to  solve  for  N  algebraically;  and  (2)  it  is  cumbersome  to  evaluate 


Table  3-9.  CIRCUIT  CHARACTERISTICS  FOR  FUNCTION  OR  USE  GROUPING 
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for  large  N,  even  on  a  computer.  Accordingly,  a  quadratic  approximation  was 
developed  to  handle  these  problems: 

log  (number  of  interswitch  trunks)  = 

1.506  +  0.399  log  (105Q)  +  0.082  (log  (105Q)2  (20) 

+  0.119  GOS  -  0.017  GOS2 

This  equation  was  estimated  by  the  use  of  linear  regression  analysis.  The 
R-squared  value  of  0.9958  shows  that  it  is  indeed  an  excellent  fit  over 
the  range  required. 

Two  additional  constraints  ensure  the  validity  of  this  estimate.  The 
estimate  of  circuits  required  cannot  be  less  than  Q,  the  amount  of  traffic. 
Nor  can  it  be  greater  than  the  number  of  circuits  in  the  group  before 
switching.  Circuit  lengths  between  switches  are  determined  from  the 
average  distance  between  facilities  that  would  normally  contain  switches 
or  concentrators ,  FSSs  and  centers.  The  cost  of  switches  has  been  estimate^ 
at  $500  per  switch  for  F&E  and  $30  per  year  per  switch  for  O&M.  These 
figures  are  derived  from  the  average  cost  per  termination  of  typical 
computer- control led  switching  equipment  for  moderate  to  large  installations . 

3.5.7  IXC  and  Circuit  Costs 


Interexchange  (IXC)  costs  are  for  those  circuits  or  portions  of  cir¬ 
cuits  that  are  priced  under  the  private-line  tariff.  An  average  cost  per 
circuit  has  been  derived  from  the  existing  system.  Local  distribution 
circuits  described  in  Section  3.5.4  are  also  included  in  this  category. 
Total  circuit  costs  include  IXC  switched  and  nonswitched  circuits.  Switched 
and  nonswitched  costs  are  based  on  cost  per  mile  and  cost  for  service 
terminations.  Up  to  nine  different  tariffs  can  be  used  to  price  each  of 
the  circuit  types  in  the  model.  Each  tariff  is  inputted  as  an  average 
cost  per  mile  for  typical  circuit  lengths  and  an  average  cost  for  ter¬ 
minating  two  ends  of  a  circuit. 


IXC 


(12  months)  ($86. 60/month) 


7 .  QTY. 

fcl  1 


IXC  Charges  (21) 


CKT  =  IXC  + 


/  ,  L .CMP , 

.£ I  1 


Circuit  Mileage 
Charges 


Termination 

Charges 


x  12  months 


(22) 


CKT  ■  total  circuit  cost 
QTYi  “  quantity  of  circuit  type  i 

j  =  index  representing  applicable  tariff  rate 
i  *  index  representing  type  of  circuit 
CMP  =  monthly  cost  per  mile  for  tariff  j 

SVC  **  monthly  cost  for  service  terminals  at  each  end  for  tariff  j 
N  =  number  of  categories  in  the  specified  circuit  group 
L  =  total  circuit  length 

3.6  LEASED  EQUIPMENT  COST  MODULE 

This  module  computes  the  cost  of  leased  equipment  such  as  terminals 
and  PBXs  required  for  data,  voice,  and  radio  circuits.  The  equation  was 
developed  from  equipment  cost  data  in  the  TSC  data  base.  The  cost  con¬ 
sists  of  two  components,  one  based  on  recurring  equipment  cost  per  circuit 
(column  9  of  SHARP,  the  switch  array)  and  the  other  based  on  operational 
units.  The  $5,467,000  figure  was  derived  from  those  equipment  costs  that 
could  not  be  allocated  to  either  a  tower,  center,  or  FSS.  The  cost  may  be 
expressed  as: 


N 

Leased  Equipment  Cost  =  12  QTY^EQPi  +  $5,467,000 

K=1 


+  ($647,800) (ARTCC)  +  ($29,900) (ATCT) 

+  ($7,970)  (FSS) 


(23) 


where 


QTY^  =  quantity  of  circuit  category  i 
EQP^  *  equipment  cost  per  circuit  category  i 


3.7  OUTPUT  MODULE 

The  purpose  of  this  module  is  to  combine  the  outputs  of  each  cost 
module  and  generate  the  cost  reports  described  in  the  User's  Guide.  The 
basic  calculations  performed  by  the  model  are  done  in  constant  dollars. 
Where  appropriate,  labor  rate  increases,  traffic  increases,  and  changes 
in  cost  due  to  technology  will  be  included  on  the  basis  of  user-specified 
inflation  rates.  The  user  may  also  specify  a  discounting  factor  that 
reflects  an  annual  decrease  in  the  value  of  the  dollar. 
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The  effects  of  inflation  on  the  constant  dollar  values  (CD)  were  com¬ 
puted  by  using  the  following  formulas: 


COSTAR (I ,  1)  =  F&E  =  (F&E _ )  r.  (1  +  j  ) 

y  yCD  *1  JvFE 


yFE 


k=79 


(24) 


COSTAR  (1,2)  =  0&My  =  (O&M^)  n  (1  +jv0M) 


yOM 


k=79 


(25) 


COSTAR(1 , 3)  =  Cktv  =  (Ckt^)  n  (1  +  3^^) 

k=79 


(26) 


COSTAR(I,4)  =  Leased  =  (Leased^)  n 

y  yCD  II 

k=79 


(L  +  ^yCkt* 


(27) 


COSTAR  (1,5)  =  Userv  =  (User^)  Q  d  +  jyF£/2  +  j^/2) 


yFE'  yOM 


k=79 


(28) 


where  COSTAR(I,J)  is  the  FORTRAN  notation  for  the  inflated  values. 

The  discount  value  reflects  an  annual  decrease  in  the  value  of  the 
dollar  and  is  computed  by: 


(F&E  +  O&M  +  Leased  +  Ckt  +  User  ) 

NPV  =  - 1 - 1 - 1 - 1 - 2L_ 

y 


y 

n 

k=80 


(1  +  ^yDIS* 


The  output  module  will  list  all  changes  to  the  baseline  system  inputted 
by  the  user  at  run-time.  This  provides  a  permanent  record  of  the  assump¬ 
tions  used  for  each  run  when  several  runs  are  entered  at  one  time. 


♦The  sumbol  fl  is  used  to  represent  the  product  of  successive  terms. 
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CHAPTER  FOUR 


PROGRAM  DESCRIPTION 


4.1  OPERATING  ENVIRONMENT 

The  FAA  Communications  Cost  Model  program  has  been  developed  to  run 
on  a  batch  operating  system  from  a  remote  card  terminal.  The  model  was 
developed  and  coded  in  FORTRAN  IV-G  for  the  IBM  360/65  computer  at  the 
Transportation  Computer  Center.  It  will  accept  user  inputs  in  punched 
card  format. 

The  source  program  consists  of  about  1,000  cards.  Memory  requirements 
on  an  IBM  computer  are  56,000  words.  Approximately  15,000  words  of  addi¬ 
tional  core  are  required  to  compile  and  execute  the  program.  This  figure 
will  vary  depending  on  the  operating  system.  Execution  time  varies  depend¬ 
ing  on  processor  load  at  the  time  the  program  is  run,  the  period  of  the 
analysis,  and  the  reports  desired.  Typical  execution  times  range  from  30 
seconds  to  one  minute  per  scenario.  Compilation  time  is  primarily  depen¬ 
dent  on  the  processor  load  and  may  range  from  2  to  5  minutes. 


4.2  SOURCE  LISTING 

The  complete  source  listing  in  FORTRAN  code  for  the  FAA  Communications 
Cost  Model  Program  is  presented  in  Figure  4-1.  The  program  is  self- 
documenting  in  that  comment  cards  have  been  used  liberally  throughout  to 
mark  the  various  routines.  To  facilitate  understanding  of  the  coding  flow, 
the  specific  functions  performed  by  the  lines  or  group  of  lines  of  code 
are  summarized  in  Table  4-1.  There  is  one  subroutine  called  by  the  program, 
TNSARR.  It  is  used  to  store  the  transition  parameters  and  is  listed 
following  the  main  program.  A  general  flow  chart  of  the  program  is  pre¬ 
sented  in  Figure  4-2. 


4 . 3  DATA 

This  section  contains  the  cost  data  base  on  which  the  cost  projections 
for  various  facility  types  are  based.  The  number  of  facilities  has  been 
updated  to  September  1979.  Costs  are  estimated  1978  values,  extrapolated 
where  necessary  from  prior-year  data.  Table  4-2  is  the  O&M  data  base. 

Table  4-3  is  the  F&E  data  base. 


4-1 


1 


For  three  facility  types  (RMLR,  RMLT,  and  TRACON)*,  the  number  of 
facilities  is  computed  by  the  program  and  is  not  inputted  with  the  O&M 
and  F&E  data  base.  The  equations  to  compute  the  number  of  facilities  are: 


RMLR  -  (ARSR)  511/97 
RMLT  =  (ARSR)  212/97 
TRACON  »  (28.2  +0.5  INSTOP) 


(30) 

(31) 

(32) 


C 

C 


MAIN  PROGRAM- -COMMUNICATIONS  MODEL 


OO0 1 
0002 
0003 
0004 
0005 
0006 
0007 
0008 
IKK)  9 
0010 
OOI  1 
(KM  2 
(X)1  3 
(K)1  4 
001  5 
(KM  6 
(KJ1  7 
(KM  8 
001  9 
0020 
0021 
0022 
0023 
0024 
0025 
0026 
0027 
0028 


0029 


INTEGER  W.TT.CT.FT.FR.Y.Y1 .Y2.YEAR.NUM 
INTEGER  STRTYR , ENOYR . NEWOLD . FRST YR . AT . CKTP 
INTEGER  RPTYP( 9) . REP ( 9 ) . TN INDX( 1000) ,NTN 
INTEGER  CTFE.l  .d.K.dd.KK.L 
INTEGER  SWMAP< 120.2) . SWINDX ( 30. 2 ) 

INTEGER  CL( 7 | , COL ( 40 ) , ELI FE( 95 ) 

REAL  NAM ARR ( 99 ) . FELBLI 10. 1 4 ) ,OMLBL( 10.19) 

REAL  OPARRI 5.3 ) .ARRAY (95.23 ) . Al 30) . CHI  7) ,UASGN(30( 

REAL  MARRAY (95.19). F ARRAY ( 9S . 14 ) , CKTARRI 1 20 . 10 ) ■ OLDFACI 95 ) 

REAL  NPVI30) .CNPVI30) . COST AR( 30 . 5 ) . TOT ( 30 ) 

REAL  TRFARRI9. 2) . TNVALU1 1 000 ) , SW ARR( 30 . 1() ) 

REAL  CST .SVC.LENGTH.QTY.SUM.YR.TSUM.REPL.V.B 
REAL  1FE(30) . 10MI30) . ICKT( 30) .1DISI30) . WGRATEI 3) 

REAL  IFR1N. INSIN.APTIN.APTOPN. IFRTFK, INSTOP. FLTSVC 

REAL  AUTOSE , AUTOTW . AUTOCN . AUTOAS 

REAL  IFRGRO. APOGRO. 1N0GR0. FSVGRO 

REAL  OLDONM.NEWONM 

REAL  CKT 1(120.4) 

EQUIVALENCE (CKTARRI 1.7) ,CKT1 (1.1)) 

COMMON  NTN. TN) NOX . TNVALU 

DATA  NPV . CNPV . COST AR/3O-0 . 0 . 30*0 . 0 . 1 50*0 . 0/ 

DATA  TRF ARR. ARRAY. S«ARR/18*00. 2185*0. 0.3(K)»0.0/ 

DATA  OPARR. MARRAY. F ARRAY . CKTARR/ 1 5*0. .1805*0. . 1330*0. . 1 200*0. / 
DATA  RPTYP.REP.W  /9*0. 9*0.0/ 

DA  r  A  CTFE.NSTAR  /'FE'.'*'/ 

DATA  UASGN/30 • 0 . 0/ 

DATA  NGRATE/23. .26.5.30./ 

DATA  CKT  P/1 / 

DATA  FOR  FACILITIES  AND  EOUIPMENT  ARRAY 

DATA  FARRAY  /(). .15. .3298. .20599. .989. .975. .620. .0. .80. .11345. . 
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Figure  4-1.  SOURCE  LISTING  (FAA  COMMUNICATIONS  COST  MODEL  PROGRAM' 


♦The  appendix  contains  a  complete  list  of  FAA  facility  alpha  codes  used 
in  the  communications  model  and  the  model  documentation. 
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0030 
003 1 

0032 
(K)33 
0034 
0035 
0036 
0037 
0038 
0039 
0040 
004  1 
0042 
0043 
0044 
0045 
0046 
004  7 
0048 
0049 
0050 
005 1 
'MI5? 
0053 
0054 
0055 
0056 

0057 
0058 
0059 
0060 
006 1 
0062 
0063 

0064 

0065 

0066 

1X167 

0068 


DATA  FAR RAY 1 04 . 03 ) . F ARRAY ( 23 . 06 ) . F ARRA Y 1 48 . 03 ) /1 00 .  .10.  .20./ 

DATA  FARRAY(23 .03) . F ARRAY ( 23 . 04 ) . F ARRAY! 23 .05 1/5 . . ISO. . 10./ 

C  CATA  FOR  OPERATIONS  AND  MAINTENANCE  ARRAY 

DATA  MAR RAY ( 01 .01 ) . MARRAY < 04 . 01 ) . MARRA Y ( 05 . 0 1 )/127 . .457. .211./ 
DATA  MARRAY (07 . 01 ). MARRAY ( 08 . 01 ) . MARRA Y( 09 . 01 )/52. .54. .26./ 

OATA  MARRAY ( 14.01) .MARRAY ( 15.01 ) .MARRAY) 16.01 )/22. .30. ,99/ 

DATA  MARRAY) 25 .01 ) . MARRAY ( 29.01 ) .MARRAY) 30.01 )/63. .488. .98./ 

DATA  MARRAY (32 .01 ). MARRAY ( 37 . 01 )  . MARRA Y ( 40 , 0 1  )/249 .  .5. .23  / 

DA  TA  MARRAY (48 .01 ) . MARRAY ( 49 . 01 )  . MARRA Y ( 50 . 0 1  )/36.  .31  .  .32./ 

DATA  MARRAY (51  .01 ) , MARRAY ( 52,01 )  . MARRA Y ( 53 . 0 1  )/37.  .20. . 1 1 ./ 

DATA  MAR  RAY (54 ,01 ). MARRAY ( 55 . 0) ) . MARRA Y ( 57 , 0 1  )/7.  . 100. .45./ 

DATA  MAR  RAY (58 .01 ) .MARRAY ( 59.01 ) . MARRA Y ( 60 . 0 1  )/49.  .49. .218 ./ 

DATA  MARRAY ( 6 1  .01  ), MARRAY ( 64 . 01  )  , MARR A Y ( 04 . 04 ) /1 4 .  .259.  .405./ 

DATA  MARRAY ( 04 . 03 ) . MARRAY ( 05 . 06 )  , MARRA Y ( 07 . 05  ) /5 .  .30. .27./ 

DATA  MARRAY (25 .01 ) . MARRAY ( 40 . 06 ) . MARRA Y ( 48 . 03 ) /63 . . 23. .25./ 

DATA  MAR  RAY ( 52 .05) . MARRAY ( 52.06)  . MARRA Y ( 52 . 07 ) /2() .  .20. . 20 . / 

DATA  MARRAY ( 6 1  .05) . MARRAY ( 61  .06)  .MARRAY I  61 .071/14.  . 14. . 1 4 . / 

DATA  MAR  RAY ( 6 1  . 04 ) . MARRAY ( 25 . 07 ) / 1 4 . .63  / 

DATA  MARRAY (01  .13) . MARRAY ( 04 . 1 3 ) .MARRAY (05. I  3 ) /0. 09 . 0 . 74 . 0 . 14/ 
DATA  MAR  RAY (07 . 1 3 ) . MARRAY ( 08 . 1 3 )  .MARRAY (09. 13)/0.51 . 1 .00.1 .00/ 
OATA  MAR  RAY ( 14.13) . MARRAY ( 15.13)  , MARRA Y( 16)31/1 .00.1 .00.0.98/ 
DATA  MARRAY!  25 .13)  . MARRAY  (  29. 13  )  .MARRAY I  30.  131/0.81.1  .00 . 1  .()()/ 
DATA  MAR  RAY (32 . 1 3 ) . MARRAY ( 37 . 1 3 ) .MARRAY (40. 131/0.32. 1 .00.1 .00/ 
DATA  MARRAY (48 . 1 3 ) . MARRAY ( 49 . 13) .MARRAY) 50. 1 3 ) / 1 .00. 1 .00. 1 ,00/ 
DATA  MARRAY (51 . ! 3 ) . MARRAY ( 52 . 1 3 ) .MARRAY (53. 13)/1 .00.1 .00.1 .00/ 
DATA  MAR  RAY (54 . 1 3 ) . MARRAY ( 55 . 1 3 ) . MARRA Y I  57 . 1 3 ) /I .00.1 .00.0.21/ 
DATA  MAR  RAY (58 .13) . MARRAY ( 59. 13)  .MARRAY (60. 1 3)/)). 1 7. 1 .00.1 .00/ 
DATA  MAR  RAY ( 6 1  . 13), MARRAY ( 64 . 13) /I .00. 1 .00/ 

C  DATA  FOR  MAIN  ARRAY 

DATA  ARR AY (41 . 05 ) . ARRAY ( 43 . 05 ) . ARRAY ( 52 . 04 ) /4 .  .4.1  / 

DATA  ARRAY! 52. 05) .ARRAY! 52 .06) .ARRAY) 56.041/1 . . 1 . . 1 ./ 

DATA  ARR AY ( 62 . 04 ) , ARRAY ( 02 , 04 ) , ARRAY ( 04 , 03 ) / 1 . . 1 . . 1 ./ 

DATA  ARRAY(05.05) . ARRAY ( 06 . 05 ) . ARRAY) 07 . 04 ) / 1 . .1 . . 1 ./ 

DATA  ARRAY) 10 . 03 ) . ARRAY ( 1 2 . 03 ) . A RRAY ( 1 8 . 03 ) / 1 . . 1 . . 1 . / 

DATA  ARR AY ( 25 . 06 ) .ARRAY! 26 . 05 ) . ARRAY ( 38 . 05) / 1 . .4. .4./ 

DATA  ARRAY(39, 05)/3./ 

C  COMPUTED  ARRAY  VALUES 
NTN  *  0 

ARRAY (50. 14)* ARRAY) 3. 14 )*511 ./97. 

ARRAY ( 5 1 . 14)= ARRAY) 3. 14)»212./97. 

ARRAY (58 . 14)* ARRAY) 6. 14) *23. /1 57 . 

C  DATA  FOR  CIRCUIT  ARRAY 

OATA  CK T  ARR  / 1 20*0 . . 1 7* 1 .  . 1 3 • • 1 .  . 21  *  1 .  . 9* -  1 .  . 29* 1 .  .  -  1  .  . 2 1  *  1 . . 

2  9* -  1 .. 141 .92.74.9.257.3. 149  28.435.42,43.54.456.96 .0. .542  59. 

2  1 12.96.500.36.88.11 . 1 68 . 18 . 63 . 85 . 31 . 92 . 1 92 . 68 . 107 . 10 . 1 3 ' 0 . . 

3  74.9.257 .3.149.28,435.42.43.54.222.94. 101 . 14.156.8.542.59. 

4  372. . 74. 43.223 .65,500.36.226.91 . 1005. .168.18.63.85.31.92.192.68. 

5  88. 1 1 .85 . 81 .9M). .77 .61 . 122 . 83. 1 38 .44.93 .25. 34 .2 .34 . 47 .21 , 47.22 .22 

6  .779.76.161 .16. 460. 02. 296. 22. 201 .47.167  18.202.75.212.45.43.78. 

7  41.97.443.67.510.1, 100.78 ,53.42,48.88.86.97  30 . 29 . 496 . 1 2 . 85 . 85 . 

8  313.6.526.87.0. .100. 78 . 76 . 22 . 227 . 25. 59 . 03 .4 1 9 . 34 . 23 . 52 . 51 . 6 . 64 . 05 

9  . 138.44 . 286.72 .97.6.167.18, 22.22.202.75.86.97.46.39.198.56.532.63 
A  .877.66.211 .43 ,563.28  C*0. , 1487 . . .41 . . 32. 1 . 41 . 1 1 . 91 .4.44 .947. .0. . 
B  .09. .56.4. 13. 128. ,3.43.3. IS. 1 .55.365.311 .. 13*0. .. 41 . .32 . 1 .41 . 

C  1 1 . 91 .4 . 44. . (6 . 1 .06.978. . . 09 . 332 . . .42 .  . 15.4 . 13.397  .  .  .292.3.48. 

D  3. 15. 1 .55.3. 35 . 128. . 312. .9*0. . 1 . 41 . .66 .2.2. . 47. . 1 1 .. 12. .44. .82. 

E  .04. .5. 16.3. . 54.8.43 . 3.48.3. 3.2. 46. .06.23.09.6.43. .37. .34. ,66. 

F  2. 51 . .6. .41 . .3 . .58,63. .342. . O. . . 34 . . 45 . 7 . 1 3 . 40 . . 56 . . . 52 . . 81 . .0864 
G.2. 2. .53. .65.3. 48, .83,3.3. .6.1503. ,1640. .113., .355.2.48.51 . .9*0. . 

H  120*0. .120*0. . 120*0, . 120*0. . 120*0. . 120*0./ 


Figure  4-1.  (continued) 


0069 


0070 


0071 


0072 


0073 


DATA  CKT 1  /.08 . .05. .05. . 1 .. 1 . .12. . 13. .0. .85. .3. .3. .08. .3, .2. .3. 


.05. . 1 . .08. .8. .08. .25. .25. .25. 

1  .  .3. .2. .05. .05. . 12. .05. .05. .05. 
. 05 . . 05 . . 05 . . 1 . . 05 . . 05 . . 3 . . 05 . 
.05. .05. . 1 . .05. .2. .3. .2. .3. .2. .08 
.120*0. .122.27.119.05.261.21. 


2  .08. . 17. 13*0. . .05. .05. .1 . . 1 . . 12. 

3  2* .08. .3. .2. .3 .2* .08. . 17.9*0. . 

4  .05. . 1 .. 2. .05. .3. .08.  25. .3. .05. 

5  .05. .05. .05.0. . .05. .05. .05. .05. 

6.05. .05. .05. .05. .05. .25. .05.9*0. 

7  123  36. 1 14.49.65. 18. 254.33.0. .271 .75. 1 17.2. 124.08.91 .80. 169.54. 

8  95. 19.75 .59. 106.55.5922. 13*0. . 1 19.05.261 .21 . 123. 36.114.49.65. 18 

9  176.4.109.86. 125.26.271 .75.263. 1 .85.39.208.59.124.08.114.15. 

•  495.9.169.54. 

A  95. 19.75 .59. 106.55.91 .8,59. 22.9*0. .104. 14. 140.97. 121 .06. 108.24. 

8  81 .22.78 .24.34 .09.75 .96,579.31 . 1 19.04, 130.55.235.84.170.82. 

C  169.25. 109. 12. 107.9.80.81 .56.5.123.97.284.73.138.4.101 .17.71.67. 
D  92.77.67.85.301 .87.98.88.178.53.288.90.0. . 1 38 . 4 . 1 09 . 86. 1 55 . 74 . 

E  2 2 3 . 93 . 4 74 . 45 . 35 . 44 . 98 . 3 . 7 8 . 37 . 1 2 1 . 06 . 228 . 68 . 1 27 . 52 . 1 69 . 25 . 75 . 96 
F  109. 12.92.77.64.03.119.96. 148. 19.410.78.107.87.264.93.9*0. . 

G  120*0.01/ 

DATA  FOR  SWITCHING  MAP 


DATA  5WMAP  /() .3 

.0,0.0 

.3.0,9 .8*0. 14* 

0. 

2. 3*  0.2 

.2.3.14*0.9*0. 

2 

3.3. 

0 . 3 . 3 , 3 . 0 

.0.3.0 

.9*0.7 

*12.4*0. 

10. 

9 . 0 . 0 . 0 

.9. 10.9.0.0.10.0.9 

3 

0.10. 

10.5*0.9- 

0.  0 

.4.0.0 

.0.1 .0.10.8*0 

.14*0. 

3. 3*0.8 

.16*0.9*0 

4 

0.12.0.13.19 

.18.0. 

0.19.0 

,9*0.0.13.19. 

18.19.17,19,4*0. 

5 

3.3. 

3*0.17.17 

.17.0. 

0.10.0 

.17.0.17 

.17.0 

.4*0.9* 

»/ 

DATA  FOR 

NAME  ARRAYS 

DATA 

NAMARR  /' 

ADCO'  . 

'A10  ' 

. ' ARSR ' . 

'  ARTC 

.  'ARTS 

.  'ASR  '  . 

'  ATCT  *  . 

2 

‘  BDIS 

'  .  '  BUEC '  . 

'CCC'  . 

'CD  ' 

,'CDC  '. 

‘CERA 

.  'CKT 

.  '  CMBT  '  . 

'  COMC' , 

3 

'  CST ' 

. 'CTRB' . ' 

OCC  '  . 

'DF  ' 

. ' EDPS ' . 

'FAC 

.  '  FDEP 

.'FM  '. 

'  PSS  '  . 

4 

'GS  ' 

.  'H 

HH  '  . 

' I ATS ' 

. ' IFSR' . 

'  IFSS 

.  '  IFST 

.  '  IM  ' . 

'  LCOT'  . 

5 

'  LDA ' 

, ' LMM  ' . < 

LNKR '  . 

‘  LOC  ' 

. ' LOM  '  . 

'  LRCO 

.  'MM 

. ' 0 AW  ' . 

'OM  »  , 

6 

'ORES 

' . ' PAR' . ' 

RAPC '  . 

' RBDE  ' 

.  ' RCAG  '  . 

'  RCO 

.  ' RMLR 

. ' RMLT ' , 

'  RTR  *  . 

7 

'  SFO ' 

. 'SSO  ' . ' 

TELE'  . 

‘  TOWB ' 

. 'TRAC'  . 

’  TRC  A 

.  'TROP 

. ' T  TS  ' . 

'TTY  '. 

8 

'VOR 

' . ' VOT  ' . 

' WMSC ' 

.  '65'  . 

'66'. '67 

'  .  '68 

.  '69'  . 

70' . '71 ' 

.  '72'  . 

9 

'73'  . 

'74' . '75' 

.  '76'  . 

'77'  .  ' 

78' . '79' 

.  '80' 

'81 ’  .  ’ 

B2' . '83' . 

A 

'  84 '  . 

'85' . '86' 

. '87'  . 

'88'  . 

8 

'89'  . 

'90'  .  '91 ' 

.  '92'  . 

'  93 '  .  ' 

94' . '95' 

/ 

4  ' R  SE' . 'CTOR' . ' OLD 


'MAIN 


DATA 

FELBL 

/'BASI'.'C  CO' 

. 'ST  0' 

. 'F  OL' 

.'D  FA' 

.  'Cl  LI'  .'TV  .3*'  ' 

2 

'BASI' . 'C  CO' 

. 'ST  0' 

.  'F  NE’ 

. 'W  FA' 

.'ClLl'.'TV' .3*  '  ' 

3'0LD' . 

'FACI' 

.'LITY'.'  COS' 

. 'T  IN' 

, 'CREA' 

.'SE  P' 

.  'ER 

S' . 'ECTO' . 'R' 

4 'OLD ' . 

'FACI  ' 

,'LITY'.'  COS' 

. 'T  IN' 

. 'CREA' 

.'SE  P' 

.  'ER 

C'  . 'ENTE' . 'R' 

5'0LD' . 

'FACI' 

. 'LITY','  COS’ 

. 'T  IN' 

. 'CREA' 

.'SE  P' 

.  'ER 

T'.'OWER'.'  ' 

6'0LD' . 

'FACI' 

.'LITY'.'  COS' 

. 'T  IN' 

. 'CREA' 

.'SE  P' 

.  'ER 

A'. 'SR'.' 

7 ' OLD '  . 

'FACI' 

,'LITY'.'  COS' 

. 'T  IN' 

. 'CREA' 

.'SE  P' 

.  'ER 

F' . 'SS' . '  ' . 

8'NEW' . 

'FACI ' 

.'LITY'.'  COS’ 

. 'T  IN' 

. 'CREA' 

. 'SE  P' 

.  'ER 

S’ . 'ECTO' , 'R' 

9 '  NEW '  . 

'FACI' 

,'LITY'.'  COS' 

, 'T  IN' 

. 'CREA' 

,'SE  P' 

.  'ER 

C'  , 'ENTE' . 'R' 

A ' NEW '  . 

'FACI' 

,'LITY'.'  COS' 

, 'T  IN' 

. 'CREA' 

.'SE  P’ 

.  'ER 

T'.'OWER'.’  * 

B'NEW' . 

'FACI' 

,'LITY'.'  COS' 

. 'T  IN' 

. 'CREA' 

.’SE  P' 

.  'ER 

A’. 'SR'.’ 

C'NEW' . 

'FACI' 

,'LITY'.'  COS’ 

. ’ T  IN' 

. 'CREA' 

.’SE  P' 

.  'ER 

F'.'SS'.’ 

D'PERC' 

. 'ENT' 

.  'OF  C' . 'OST' . 

' DUE'  .  ' 

TO  C'  .  ' 

OMMU '  .  ' 

NICA 

. 'TION' . 'S' . 

E'NUMB' 

.  'ER  0 

' . ’ F  FA' . 'CILI 

' . 'TIES 

'.'  REO 

’ . 'U1RE 

'  .  '0 

IN'.*  SYS'. 

F  'TEM'/ 

DATA  OMLBL  / 

'MAIN' . 'TENA' , 

'NCE'  .  ' 

COST’  .  ' 

OF' . 'OLD' . 

FACI' . 'LITY' . 

2  2*  '  ’ 

'MAIN' . 'TENA' . 

'NCE'  .  ' 

COST '  .  ' 

OF' . 'NEW' . 

FACI '.'LITY'. 

3  2*'' 

. 'OLD' 

.  'MAIN' . 'TENA' 

. 'NCE'  . 

'COST  '  . 

'  INC'. 

'REAS’. '£  PE'. 

'TENA' . 'NCE ' . 'COST* 


INC*. 'REAS' 


Figure  4-1.  (continued) 
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5  'E  PE'.'R  CE' . 'NTER' . 'OLD' . 'MAIN' . 'TENA' , 'NCE' . 'COST' . '  INC', 

6  'REAS'. 'E  PE'.'R  TO' . 'WER' . 'OLD' . 'MAIN' . 'TENA' . 'NCE' . 'COST* . 

7  '  INC' .' REAS' , 'E  PE'.'R  AS '.' R' . 'OLD' . 'MAIN '.' TENA '. 'NCE '. 'COST ’ . 

8  '  INC' . 'REAS' . 'E  PE'.'R  FS '.' S' . 'NEW' .' MAIN '.' TENA ', 'NCE '. 'COST ' . 

9  '  INC' . 'REAS' . 'E  PE'.'R  SE ' . ' CTOR ' . 'NEW ' . 'MA IN' . ' TENA ' . ' NCE ' . 

A  'COST'.'  INC' . 'REAS' . 'E  PE'.'R  CE '. 'NTER' . ‘ NEW MAIN' .' TENA ' . 

B  'NCE' . 'COST' . '  INC' . 'REAS' . 'E  PE'.'R  TO' . 'WER' . 'NEW' . 'MAIN* . 

C  'TENA' . 'NCE' .' COST' . '  INC '.' REAS  '.' E  PE'.'R  AS ' . ' R ' . ' NEW  * . 'MAI N' . 
D  'TENA' . 'NCE' .' COST’ . •  INC *.* REAS '.' E  PE'.'R  FS ' . ' S '  . ' PERC ' . ' ENT  * . 
E  'OF  C'.'OST'.'DUE'.'TO  C '.' OMMU' . 'N1CA '.' TION '.' S '. 'OLD' . 'MAIN * . 

F  'TENA'. 'NCE'. 'CTGV'. '  1  L'.'ABOR'.'  YEA'.'RS'.'  '.' OLD' . 'MAIN ' . 

G  'TENA' . 'NCE' . 'CTGV' . '  2  L'.'ABOR'.'  YEA'.'RS'.'  '. 'OLD' . 'MAIN' . 'T 
HENA' . 'NCE ' . 'CTGY' . '  3  L'.'ABOR'.'  YEA'.'RS'.'  '. 'NEW' . 'MAIN' .* TENA 
I*. 'NCE'. 'CTGY' . '  1  L'.'ABOR'.'  YEA'.'RS'.'  '.' NEW '.' MAIN ' TENA ' . 
d  'NCE' , 'CTGY' . '  2  L'.'ABOR'.'  YEA'.'RS','  '.' NEW ',' MAIN '.* TENA ' . 

K  'NCE' . 'CTGY' , '  3  L' , ' ABOR' . '  YEA' . 'RS' . '  '/ 


c 

DATA  FOR  TARIFF  ARRAY 

007# 

DATA  TRFARR! 1 . 1  )  ,TRFARR( 1 . 2 )/0 . 50 .86 . 60/ 

0075 

OAT A  TRFARR! 2. 1 ) . TRFARR( 2 . 2 1/1 . 75. 1 56 . 90/ 

c 

MISCELLANEOUS  DATA  INITIALIZATIONS 

0076 

DO  3  1=65.95 

007  7 

FARRAYf 1 .131=1 .0 

0078 

MARRAY !  1.131  =  1.0 

007f 

3 

CONTINUE 

0080 

DO  6  1=1.95 

008 1 

ARRAY ( I . 131=1 10. 

0082 

ARRAY ( I ,23)<1 10. 

0083 

FARRAY1 1  . 2 )  =  F  ARRAY ( 1.1) 

0084 

MARRAY1 1  , 2 ) =MA  RRAY ( 1.1) 

0085 

DO  4  d=3 . 7 

0086 

K*d+5 

0087 

FARWAY (  1  . K ) *FA  RRAY { 1  ,d) 

0088 

MARRAY ( I  . K ) =MA  RRAY ( 1  .d) 

0089 

4 

CONTINUE 

0090 

DO  5  d= 1 4 . 1 6 

009 1 

5 

MARRAY! I . d+3 )» MARRAY ( I ,d) 

(K192 

6 

f - 

CONTINUE 

c 

c 

READ  INPUT  DATA 

0093 

READ! 4 . 7 ) ( COL ( I ) . 1=1 .40) 

0094 

7 

FORMAT ( 40A2 ) 

0095 

WR1TE15.  BMCOU  1 1.1*1.40) 

0096 

8 

FORMAT ( ' 1 ' . 20X . 40A2/// ) 

0097 

9 

READ! 4 . 10. END* 160)  CT  .  ( CO L ( I ) . 1  =  1 .40) 

0098 

10 

FORMAT  ( 1 1 ,A1 . 39A2) 

0099 

11 

IF  (CT.NE.O)GOTO  20 

0100 

12 

WRI TE ( 5 , 15)  CT.  (COL( I ). 1=1 .40) 

0101 

IS 

FORMAT! 5X . 'ERROR-NO  CARD  TYPE  ASSIGNED- FORMA T  FOR  DATA  ENTRV 
0  IS  UNSPECIFIED-PROGRAM  NOT  EXECUTED* . 1 1 . A1 . 39A2 ) 

0102 

STOP 

0103 

17 

WRITE(5. 18)  CT 

0104 

18 

FORMAT!//'  INVALID  CARD  TYPE  '.12.*  ---  PROGRAM  NOT  EXECUTED 

0105 

STOP 

Figure  4-1.  (continued) 
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0106 


C 

C  COMMAND  SWITCH 
C 

20  GO  TO  (21 .40.64.81 , 105. 11 1 . 122, 146. 152) .  CT 
C 

C  CHANGES  TO  F«E  COSTS 
C 


0107 

21 

WRITE<5. 22) 

0108 

22 

FORMAT) ' 1  * .50X . 'F  AND  E  CHANGES’//) 

0109 

24 

READ! 4. 25. END* 160)  CT , FT . ( CL < I ) . CH( I ) . 1  *  1 . 7 ) 

0110 

26 

FORMAT ( 1 1 . IX. I 2.7) IX. 12. 1X.F6.0) ) 

0111 

IF(CT.NE.O)  GOTO  20 

0112 

30 

00  35  K» 1  .  7 

01  13 

IF(CMK)  .EQ.O)  GOTO  24 

01  14 

I F ( CL ( K )  . EO .13)  CHI K )=CH(K  J/100. 

0115 

WRITE! 5. 700)  NAMARR(FT).  ( FELBL ( 1 . CL( K ) ) . I- 1 . 10) . 

2 

F  ARRAY (FT,CL(K)).CH(K), ARRAY (FT .13) 

0116 

33 

FARRAYI FT.CLIK) )*CH(  K) 

01 17 

35 

CONTINUE 

0118 

/■» 

GOTO  24 

w 

c 

r 

CHANGES  TO  06M  COSTS 

0119 

V 

40 

WRITEI5. 41 ) 

0120 

41 

FORMAT! ' 1 ' ,50X . *0  AND  M  CHANGES'//) 

0121 

44 

READ( 4 , 45 .  END  *  1 60 )  CT . FT . ( CL ( I ) , CH( I ) . I • 1 , 7 ) 

0122 

46 

FORMAT! I 1 . IX. 12.7) IX. I2.1X.F6.0) ) 

0123 

IF! CT. EQ.O)  GO  TO  47 

0124 

WR 1 TE ( 5 . 46 ) 

0125 

46 

FORMAT! ' 1 ' ) 

0126 

GOTO  20 

0127 

47 

IF! FT.NE .0)  GO  TO  52 

0128 

DO  49  K=1 .3 

0129 

I F (CL ( K ( . EO . 0 )  GO  TO  50 

01  30 

WGRATE! C  L ( K ) ) *  CH( K ) 

0131 

49 

CONTINUE 

0132 

50 

WRITE (5. 51 ) (WGRATE! 11.1*1.3) 

0133 

51 

FORMAT! ■()' .50X . 'MAINTENANCE  WAGE  RATE.  INCL  BENEF ITS: ' . 4X . 3F16. 2 ) 

0134 

GO  TO  44 

0135 

52 

DO  55  K* 1 ,7 

0136 

IF  ( CL! K ) . EO . 0 )  GOTO  44 

0137 

IF(CLIK) .EQ.13I  CH(KI*CH<K)/100. 

0138 

WR 1 TE ( 5 . 700 )  NAMARR(FT).  ( OMLBL ( I . CL ( K ) ) . I *  1  . 1 0 ) , 

2 

MARRAY! FT . CL ( K  ) ) .CH ( K ) . ARRAY) FT . 23 ) 

0139 

S3 

MARRAY! FT ,CL(K ) )*CH(K) 

0140 

55 

CONTINUE 

0141 

GOTO  44 

C 

C  CHANGES  TO  CIRCUIT  PARAMETERS 


0142 

C 

64 

RE AD! 4. 67, END- 160)  CT . FT . ( CL) I ) , CH( I ) . 1*1 .5) 

0143 

67 

FORMAT! 1 1 .IX. 12.5(1X.12.1X.F6.0) ) 

0144 

GO  TO  20 

C 


Figure  4-1.  (continued) 
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C  TRANSITION  PARAMETERS 
C 


0145 

81 

DO  82  Iil .30 

W9 

0146 

82 

A(  I ) =0 . 0 

0147 

RE  ADI  4. 85. END. 160 )CT . FT . AT . J . LI F E .MODE . FRST Y R . ( A( I ) . I •  1  , 1 0 ) , Y 

- 

0148 

85 

FORMAT ( 1 1 . 13. 1 X ,A2. 12. 14. 12. 15, 101 1X.F3.2) . 19X.A1  ) 

0149 

IFICT.NE .0)  GOTO  20 

Wit 

01  50 

IF! Y.EQ. NSTAR)  READ! 5. 89) I A( I). 1.11 .30) 

0151 

88 

FORMAT! IX. 11. 13. IX. A2. 12. 13. 12. IS , 15F6 . 2 . / . 20X . 15F6 . 2 ./ ) 

0152 

89 

FORMAT ( 20 ( 1X.F3.2)) 

■“** 

0153 

JJ.2 

0154 

IF< AT ,E0  CTFE )  JU*1 

8*  V 

0155 

ELIFE(FT)  =  LIFE 

0156 

B.TNSARRI FT .00 ,0. 1 ) 

V» 

0157 

1F( JJ.EQ. 1 )  ARRAY! FT . 1 3 ) * F RST YR -  1 900 

0156 

IF! JU.E02)  ARRAY (FT ,23). FRST YR- 1900 

■m  » 

0159 

DO  95  L.  1  .30 

0160 

K. FRSTYR - 1 979+  L 

0161 

IF  ( AIL) . GT.O.0)  GO  TO  93 

"* 

0162 

1 F ( MODE ■ 2 )  92,94.96 

0163 

92 

I F ( 0 . EO . 1 )  B=0. 

■*  * 

0164 

GO  TO  94 

0165 

93 

6=A( L) 

0166 

94 

IF! (U.EO. 1 . ANO. B.GE.0.999) . OR. (J.E0.2. AND.B. LE.0.001 ) )  GO  TO  95 

0167 

1 F ( K . GT . 30 )  GO  TO  95 

m  >* 

0166 

NTN  .  NTN+1 

0169 

TN1NDX(NTN).120»FT+60*OJ+30*J+K 

0170 

TNVALU(NTN)  .  B 

■* 

0171 

AIL)  *  B 

0172 

95 

CONTINUE 

■■ 

0173 

GO  TO  99 

0174 

96 

IF(L1FE.EQ.1)G0  TO  99 

0175 

Y2  =  L+UFE-2 

0176 

IF( Y2 . GT . 30)  Y2«30 

V  r" 

0177 

DO  97  Y.L.Y2 

0176 

NTNsNTN+1 

0179 

TNINDX(NTN)  «  1 20*FT  ♦  60‘dd  ♦  30*0  ♦  Y 

- 

0180 

TNVALU(NTN)«-1  . 

0181 

97 

CONTINUE 

«  r. 

0182 

99 

WR I T  E ( 5 . 88 ICT.FT.AT.d.LIFE. MODE . FRST YR . ( A (I ) . 1 . 1 . 30 ) 

0183 

IF! ONE. 1  AND. d.NE.2)  GO  TO  17 

«■  <*■ 

0184 

r 

GO  TO  81 

mw 

t 

c 

r 

CHANGES  TO  TARIFFS 

0185 

l* 

105 

RE AD! 4. 106. END* 160)  CT , TT . CST . SVC 

T 

0186 

106 

FORMAT! 2! 11 . IX ) .2! F6.2. IX)  ) 

1 

0187 

IF(CT.NE.O)  GOTO  20 

»• 

0188 

WRITE!  5, 107ICT .TT, CST. SVC 

0189 

107 

FORMAT!'  ' .2! I 1 . IX) . 2(F6.2 , IX) ) 

01  90 

TRFARR(TT,1 )*CST 

1 

0191 

TRFARR(TT.2).SVC 

m 

0192 

GOTO  105 

t 

Figure  4-1.  (continued) 
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•  U.U.- 


C  USER  ASS1GNE0  COSTS 
C 

111  READI4. 1 12. END-160)  CT  .  FRSTVR . ( A ( J ) . d-1 .8) 

112  FORMAT (I1.1X,I4.8(1X.F7.3)) 

IF(CT.NE.O)  GOTO  20 

1 F ( FRST YR . LE . 1 978 )  GOTO  945 
DO  115  L«1 .8 
K-FRSTYR- 1979+L 
1  F  (  K  .  GT  .  30 )  GO  TO  HI 

1FIAID.EQ.0.)  GO  TO  HI 
UASGN! K ) -A! L ) 

IIS  CONTINUE 

GOTO  111 


C 

C  INTEREST  AND  AUTOMATION  FACTORS 
C 


0204 

122 

2 

RE  ADI  4 , 123. END *160)  CT . 1 F E < 1 ) . IOM< 1 ) . I CKT ( 1 ) . I DIS< 1 ) . SECTOR 
AUTOSE. AUTOCN . AUTOTW . AUTOAS . AUTOFS 

0205 

123 

FORMAT! 12.4( IX .F3.2) . 1X.F4.0.5! 1X.F4.2) ) 

0206 

1 F ( CT . NE .71)  GOTO  17 

0207 

DO  124  1*2.30 

0208 

IFE  ( I ) *  1 FE  (1  ) 

0209 

IOM  { I )  =  10M  (  1  ) 

0210 

ICKT ( I ) = 1 CKT ( 1 ) 

021  1 

IDIS(1)*IDIS( 1 ) 

0212 

124 

CONTINUE 

0213 

2 

READ! 4. 125. END* 160)  CT . 1 FR IN . APT  IN . INSIN . FLT IN . 

IFRGRO. APOGRO. INOGRO . F5VGR0 

0214 

125 

FORMAT! 12. 4( IX . F6. 1 ) ,4( IX, F3.2) ) 

0315 

IFICT.NE72)  GOTO  17 

0216 

126 

READ! 4. 127. END- 133)  CT , Y1 . Y2. ( A| I ) . 1*1 . 16) . Y 

021  7 

127 

FORMAT! 12.215. 16F4. 2. 3X.A1 ) 

0218 

I F ( CT . LT • 73.0R.CT.GT. 77)  GO  TO  133 

0219 

I F ( Y . EO . NST AR )  READ! 4 , 1 28 ) ( A( I ) . I -1 7 . 30 ) 

0220 

128 

FORMAT! 14! 1X.F3.2)) 

0221 

DO  129  I  * Y 1  .Y2 

0222 

d*  I  - 1978 

0223 

K-1-Y1+1 

C  PROCESSING  OF  THE  73.74.75.76.77  COMMANDS 


0224 

0225 

0226 

0227 

0226 

0229  129 

0230 

0231  6509 

0232 

0233 

0234 

0235  6510 

0236 

0237  651 1 

0238 


I F ( CT . EO . 73 )  IFE  <U)=A(K) 

IFICT.EQ.74)  IOM  <U)-4(K) 

I F ( CT . EO ■ 75 )  I CKT ( J ) * A( K ) 

I F ( CT . EO . 76 )  IOIS!U)=A(K) 

I F  <  CT . EQ • 77 )  GO  TO  6509 

CONTINUE 

GO  TO  126 

DO  6510  1*1.95 

PE  RCOM*  F  LOAT ( Y 1 ) / 1 00 . 

FARRAY! I . 13)*PERC0M 
MARRAY ( I . 13)*PERC0M 
CONTINUE 

MR  1 TE( 5 . 651 1 )  PERCOM 

FORMAT! 1  HO. '  ALL  COMMUNICATIONS  PERCENTAGES  ARE  ' 

GO  TO  126 


0193 
0194 
0195 
0196 
0197 
0198 
0199 
0200 
020 1 
0202 
0203 


Figure  4-1 


(continued) 


C 

PRINT  INTEREST  AND  AUTOMATION  FACTORS 

0239 

133 

WR1TE<5. 136) 

0240 

136 

FORMAT ( 1  HO.//. 23X, ' INFLATION  FACTORS' .//. 2X . 'YEAR' , 11X. 'F6E' . MX 
2  '0«M',  7X. 'CIRCUITS' .  7X. 'DISCOUNT' ./) 

0241 

DO  134  I « 1 . 30 

0242 

d* I +1976 

0243 

134 

WRITE(5,135)d.IF£(I).I0M(I), ICKT ( I ) .  I D 1 S  (  I  ) 

0244 

135 

FORMAT! 16.4(2X.F12.3>) 

0245 

140 

WRITEtS, 141 )  AUTOSE. AUTOCN.AUTOTW.AUTOAS.AUTOFS 

0246 

141 

FORMAT! '0' . 'AUTOMATION  FACTORS  ' . 5( 1 X . FB . 3 ) ) 

0247 

142 

WRITE (5. 143)  1 FRIN. APT  IN. INSIN, FIT  IN 

0248 

143 

FORMAT!'  '.'TRAFFIC  DATA  '  ,  6X . 4 ( 1 X . F8 . 3 ) ) 

0249 

WRITE! 5. 144)  1 FRGRO . APOGRO . INOGRO . FSVGRO 

0250 

144 

FORMAT!'  '.'TRAFFIC  FACTORS  ' . 3X . 4( 1 X . F8. 3 ) ) 

0251 

CT  sCT/10 

0252 

C 

GO  TO  20 

C  CHANGES  TO  THE  SWITCHING  MATRIX 

c 


0253 

146 

READ! 4 . 1 461 )CT .CKTP 

0254 

1461 

FORMAT! I 1 ,7X. 12) 

0255 

1465 

READ! 4. 147. END *160)  CT . FT . ( CL( I ) . CH< I ) . I«1 . 5 ) 

0256 

147 

FORMAT!  I 1 . IX. 12 .5! IX . 12. IX . F6.0) ) 

0257 

IFICT.NE.O)  GOTO  20 

0258 

148 

FORMAT!'  CIRCUIT  TYPE ' . I 3 . ' . ' . 5X . 5( 5X . ' ( ' . 12 . ' 

i 

0259 

DO  149  K  *  1 . 5 

0260 

I F ( CL ( K )  .EO.O)  GOTO  1495 

0261 

CKTARR! 30*CKTP+FT-3O.CL(K) )  *  CH(K) 

0262 

149 

CONTINUE 

0263 

1495 

K  =  K  - 1 

0264 

WR ]TE(5, 148)CKTP,(FT.CL(i ) , CH( I ) . I  *  1 , K ) 

0265 

GOTO  1465 

c 

C  REPORT  PERIOD 


0266 

C 

152 

READ! 4. 155. END* 160)  CT . STRTYR . ENDYR . ( REP( I > .1*1.9) 

0267 

153 

WR 1 T  E ( 5 , 1 54 )STRTYR. ENDYR 

0268 

'154 

FORMAT! 1H0. 'REPORTS  WILL  RUN  FROM'. 15,'  TO' . 15) 

0269 

155 

FORMAT! 11 .2(1X.I4).9(1X,I1 )) 

0270 

IF! REP!  1  ) .EO.O  )  REP( 1  )*1 

0271 

DO  156  K  *  1  . 9 

0272 

L*  REP( K ) 

0273 

IF! L. EO.O)  GOTO  157 

0274 

RPTYP(L)*1 

0275 

156 

CONTINUE 

0276 

157 

K  =  K-1 

0277 

WR I TE( 5 , 158)  ( REP( I ) . 1*1 .K) 

0278 

158 

FORMAT!'  '. 'REPORTS: ' .9(2X . 12) ) 

C 

INSERT  CHANGES  INTO  MAIN  ARRAY 

0279 

160 

DO  161  1*1.95 

0290 

ARRAY! 1 .01 ) *  F  A  RRAY  (  1.14) 

0281 

ARRAY! I . 14 )=F ARRAY! 1,14) 

0282 

ARRAY! 1 . 1 5 ) *FARRAY(  1.14) 

0283 

ARRAY! I . 1 7 )*FARRAY(  1.14) 

Figure  4-1.  (continued) 
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0284 

161 

CONTINUE 

0285 

162 

IF! RPTYPI3) .NE . 1 )  GOTO  168 

0286 

WRITEfS. 163) 

0287 

163 

FORMAT! ' 1 ' .53X . 'FACILITIES  AND  EQUIPMENT  MATRIX ' . // ,27X . ' I ' .9* . '0 

2LD  FACILITY  COST  INCREASE 9X . ‘ I 9X NEW  FACILITY  COST  INCREASE' 

3 , 9X . ' I ' , / . 27X , ' I '  .44* . '  I ' . 44X , ' I ' ,/,14x. 'OLD  NEW  I  PER 

4  PER  PER  PER  PER  I  PER  PER  PE#  P 

5ER  PER  t  PCT  NO'./.'  '.'FACILITY  COST  COST  I  S 

6ECT0R  CENTER  TOWER  ASR  FSS  1  SECTOR  CENTER  TOW 

7ER  ASR  FSS  1  COMM  FACILITY'./) 

0288  164  DO  167  1*1.95 

0289  165  WRITE15. 166 INAMARR! 1 ) . ( FAR RAY (I.J).J«1.14) 

0290  166  FORMAT!'  ' . A4 . 3X . 121 2X . F7 . 1 ) . 2X . F6 . 2 . 2* . F7 . O ) 

0291  167  CONTINUE 

0292  168  I F I PPTYP  <  4 ) . NE  .  1  )  GOTO  940 

0293  169  FORMAT! ' 1 ' .53X . 'OPERATIONS  A  MAINTENANCE  MATR1 X ' . // . 27X . ' I ' ,9X . ‘0 

2LD  FACILITY  COST  INCREASE '. 9X .' I 9X .' NEW  FACILITY  COST  INCREASE' 
3.9X . ' I ' . / . 27X . ' I ' . 44X ,'I'.44X.'I',/.14x. 'OLD  NEW  I  PER 

4  PER  PER  PER  PER  I  PER  PER  PER  P 

5ER  PER  I  PCT  NO'./.'  '.'FACILITY  COST  COST  I  S 

6ECT0R  CENTER  TOWER  ASR  FSS  I  SECTOR  CENTER  TOW 

7ER  ASR  FSS  1  COMM  FACILITY'./) 


0294 

WR I TE ( 5 . 169) 

0295 

170 

DO  173  1*1.95 

0296* 

171 

WRITE (5. 1 66 )NAMARR( 1 ) , (MAR  RAY! I . J)  .J*1 .13) .F ARRAY!  1.14) 

0297 

173 

C 

CONTINUE 

C  INITIALIZATION  routine  for  costs 

c 


0298 

940 

YR= 79 . 

0299 

STRTYR*STRTYR- 1900 

0300 

ENDYR.ENDYR- 1900 

0301 

I F ( STRT  Y  R . GE . 7  9 . AND . STRTYR . LE . 1 08 . AND . ENDYR . CE . 79 . AND. ENDYR , l£ . 

2  108IG0  TO  952 

0302 

945 

WR I TE ( 5 . 946 ) 

0303 

946 

FORMAT! ' 1 '. 'START  YEAR  AND  END  YEAR  MUST  BE  IN  THE  RANGE  '. 

*  '1979  TO  1999  ---  PROGRAM  NOT  EXECUTED.') 

0304 

STOP 

0305 

952 

1 F ( SECTOR ■ EQ. 0 . )  SECTOR-723. 

0306 

OPARR! 1 .  1  )*SECTOR 

0307 

OPARR! 2 . 1 ) * ARR AY ( 4 , 14) 

0300 

OPARR! 3 . 1 )*ARRAY(7. 14) 

0309 

OPARR! 4 , 1 ) -ARRAY ( 6 . 14) 

0310 

OPARR (5. 1 )*ARRAY(25,14) 

031  1 

DO  955  1*1.5 

0312 

OPARR! I . 31-OPARR! 1.1) 

03 1  3 

955 

CONTINUE 

0314 

2006 

1F(RPTYP(9),EQ.0)  GOTO  999 

0315 

DO  971  K«1 .2 

03 1G 

1*0 

0317 

DO  970  u*1 . 10 

0318 

1*1  +  1 

0319 

A (  I  )*TNSARR(48.K.1.J) 

0320 

1*1  +  1 

Figure  4-1 


(continued) 


0321 

A(  I  l*TNSARR(48.K.2. J) 

0322 

970 

CONTINUE 

0323 

WRITE (5. 2008)  ( A(  J ) , J= 1 , 20 ) 

0324 

971 

CONTINUE 

0325 

2008 

C 

FORMAT ( 'O' . 'RCAG' . 10< 5X . F4 . 2)/5X . 10(5* . F4 . 2) ) 

C  COMPUTE  OPERATIONAL  UNIT  REQUIREMENTS  FOR  CURRENT  YEAR 
C 


0326 

999 

Y 1  =YR-78 . 

0327 

I FRTFK* 1 , 2505* YR- 69. 204 

0328 

IF( IFRIN.NE.O. )  I FRT  FK= I FR I N 

0329 

IF) 1FRGR0.E0.0. )  IFRGR0*1.0 

0330 

I FRT  FK* 1 FRGRO' ( IFRTFK-27. 75 )+27 . 75 

0331 

1000 

IFIAUTOSE.EQ. ().())  AUTOSE*1.0 

0332 

OP ARR ( 1 , 2  )  =  ( 49  1  . 1*AL0G( I FR TFK ) - 926 . 43 ) /AUTOS E 

0333 

I F  1  OPARR ( 1 .2)  GT. 1200.  )  0PARR(1 ,2)*1200. 

0334 

1F( AUTQCN.EQ.0.0)  AUT0CN=1.0 

0335 

OPARR (2 . 2I=0PARR< 2. 1 l/AUTOCN 

0336 

AP TORN* 306. 7- 18429 . /YR 

0337 

I F ( APT  IN ■ NE . 0 .  )  APTOPN=APTIN 

0338 

IF! APOGRO.EQ.O. )  APOGRO* 1 . 0 

0339 

APTOPN*APOGRO* ( APT0PN-7O.46)+7(>.  46 

0340 

1005 

IF(AUTOTW.EQ.O.O)  AUT0TW=1.0 

0341 

OPARR!  3 . 21=270 .  +  2 .  *  YR 

034  2 

INSTOP* 2 . 447* E*P( 0.0347* YR) 

0343 

I F ( INSIN.NE.O. )  INST0P=1NS1N 

0344 

IF! INOGRO. E0.O. )  I NOGRO* 1 . 0 

0345 

INSTOP* 1 NOGRO  * ( INSTOP • 33 . 64 )+33 . 64 

0346 

1010 

IF< AUTOAS.EQ.O .0)  AUTOAS*t.O 

0347 

OPARR ( 4 , 2 )= ( 123 . 3+1 . 00* INSTOP )/AUTOAS 

0348 

FLTSVC  =  365.466  -  23415. 4/YR 

034  9 

IF(FLTIN.NE.O.O)  FLTSVC=F L TIN 

0350 

I F ( FSVGRO . EQ . 0 . )  FSVGR0-1.O 

0351 

F  L TSVC  =  FSVGRO  * ( FLTSVC -67 . 80 1+67 . 80 

0352 

1 F ( AUTOF S • EO .0.0)  AUTOFS= 1  . 0 

0353 

OP ARR ( 5 . 2 )= OPARR (5.1 )/AUTOFS 

0354 

IF( RPTYP(6) .NE. 1  I  GOTO  1013 

0355 

WR  1 1 E ( 5 .  1011 ) 

0356 

101  1 

FORMAT! ' 1 ' .50X . 'OPERATION  MATRIX' .SOX) 

0357 

WRITE! 5. 1012)  ( (OPARR! I .J) . J.1 .3) .1*1 .5) 

0358 

1012 

C 

FORMAT ( 3 ( 5X , F 1 0 . 4 ) ) 

C  COMPUTE  FACILITY  AND  EQUIPMENT  COST 
C 


0359 

1013  TSUM*0. 

0360 

Y1*YR-78 . 

0361 

Y2=Y1 - 1 

0362 

00  1040  1*1,95 

0363 

OLOFAC ( 1 )  *  0. 

0364 

ARRAY! I .  1 6 ) * AR  RAY ( I . 

15) 

0365 

U*  ARRAY !  1.14) 

0366 

IF!  1  .EO. 57)  U*  28 . 2+0 

. 5* INSTOP 

0367 

00  1015  K* 1 , 5 

0368 

KK*K+ 1 

Figure  4-1.  (continued) 


0369 

8«0PARR( K . 2 1 -OPARR< K , 1 ) 

0370 

IF1B.LT.0- )  8*0 . 

0371 

U*U+ARRAY( l.KK)*B 

0372 

1015 

CONTINUE 

0373 

ARRAY (1,01 )*U 

0374 

ARRAY! I . 15)*U 

0375 

IF  (YR.GE.ARRAV1I.13))G0T0  1025 

0376 

SUM*FARRAY( I . 1  )  * ( ARRAY ( I . 1 5) -ARRAY ( 1 . 1 6 ) ) *FARRAY< 1 . 13) 

0377 

I F ( SUM . LT . 0 . )  SUM*0. 

0378 

DO  1020  K=  1  . 5 

0379 

KK  *K+2 

0380 

B*OPARR( K.2)-0PARR(K .3) 

0381 

IF1B.LT. 0. )  8*0. 

0382 

SUM=SUM+FARRAY ( I . KK ) *B 

0383 

1020 

CONTINUE 

0384 

GOTO  1035 

c 

C  FAE  TRANSITION  COSTS 


0385 

C 

1025 

I F 1 YR . NE . ARRAY (1.13))  GOTO  1027 

0386 

IF1ARRAY1I.13) .GT.ARRAYII .23))  GOTO  1027 

0387 

ARRAY! 1 . 17)=ARRAY< l . 16) 

0386 

DO  1026  K*1  ,5 

0389 

ARRAY ( I . K+ 1 7 ) *  OPARR ( K , 3 ) 

0390 

1026 

CONTINUE 

0391 

1027 

SUM  *  0. 

0392 

V  *  TNSARR1 I . 1  . 2. Y1  ) 

0393 

IF1V.EQ.0. )  GO  TO  1034 

C 

FIND  AVAILABLE  NEW  FACILITIES  FROM  PREVIOUS  YEARS 

THIS 

I  IS  DONE 

C 

BY  SEARCHING  THROUGH  THE  TRANSITION  DATA  FOR  THE 

PROPER 

ENTRIES. 

0394 

1028 

LIFE  *  ELIFE1I ) -1 

0395 

AVNEW*0. 

0396 

Jd  =  Y1  •  LIFE 

0397 

IF(dd.LE.O)  dd*1 

0398 

DO  1031  K*1.Y2 

0399 

11  *  120*  I  +  120  ♦  dd 

0400 

dd  *  dd  ♦  1 

0401 

DO  1029  d  *  1  .NTN 

0402 

I F ( TNI NOX 1 d ) . EQ .11)  GO  TO  1030 

0403 

1029 

CONTINUE 

0404 

GO  TO  1031 

0405 

1030 

AVNE*'  *  AVNEW+TNVALU1  d  ) 

0406 

1031 

CONTINUE 

C  i 

NOW  CALCULATE  NEW  ‘NEW’  FACILITIES  NEEDED  AND  NEW 

’OLD' 

facilities 

c 

(RELEVANT  IF  TRANSITION  MODE  3  SPECIFIED) 

0407 

IF( V.GE.O)  FENEW*AMAXt(ARRAY(I.15)*V-AVNEW.O. ) 

0408 

IF1V.LT. 0)  FENEW«0. 

0409 

II  *  120* I  +  120  ♦  Y1 

0410 

DO  1032  d*1  .NTN 

041  1 

IF! TNINDX(d) .EQ. II )  GO  TO  1033 

0412 

1032 

CONTINUE 

0413 

1033 

TNVALU(d)  *  FENEW 

0414 

IFIV.GE.O.)  FEO LD*0 . 

0416 

I F ( V . LT . 0 )  FEO  L  D» AMAX 1 ( 0 . . A RRAY ( 1 . 1 5 ) -  A VNEW- FENEW- A RRAY ( 1 . 1 7 ) ) 

Figure  4-1.  (continued) 
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0410 

SUMsFARRA Y(  1 . 2  )  '  FENEW  •  FARRA  Y  ( I  .  13)+FARRAY(  1 .  1  )  •  FEOl  D*  FARR  AY  ( 1.13) 

04 1  7 

OLDFAC! I )  «  O. 

0410 

IF( V.LT.O.  )  OLDFAC! I) -ARRAY (l. 15 )-AVNEN*FENEW 

0419 

1034 

DO  1036  H«1 .5 

0430 

SUM = SUM* FARR AY (  I  . K+7 ) * AMAX 1(0. ,OPARR( K . 2 ) -OPARR! K , 3) ) 

0421 

1036 

CONTINUE 

0422 

1035 

TSUM  *  TSUM+SUM 

0423 

1040 

CONTINUE 

0424 

C0STAR(Y1 .1 )*T  SUM/1000 . 

C  COMPUTE  OPERATIONS  AND  MAINTENANCE  COSTS 

0425 

V 

TSUM*0. 

0426 

00  1065  1=1.95 

0427 

OLDONM*MARR AY (  I . 1  )+M ARRAY!  I . 1 4 ) ♦ WGRATE ( 1 l+MARRAV ( 1 , 1 5 ) 'WGRATE! 2 ) 

2  +M ARRAY (1,16)' WGRAT€( 3 ) 

0420 

NEWONM*M ARRAY! I . 2 ) +MARRA Y ( 1 .17)*  NGRATE ( 1 )+MARRAY( 1 . 18) *WGRATE( 2 ) 

2  +MARRAY (  I . 19) *  WGRATE ( 3 ) 

0429 

SUM-O. 

0430 

1FIYR.GE .ARRAY! 1 .23) )  GOTO  1050 

043  f 

SUM'ARRAY! I , 1S)*0LD0NM*MARRAV( I . 13) 

0432 

DO  1045  K*  1 , 5 

0433 

SUM^SUM+MARRAY ( I .  K+2 ) * (OPARR! K , 2 ) -OPARR! K . 1 ) ) 

0434 

1045 

CONTINUE 

0435 

r* 

GOTO  1060 

C  OSM  TRANSITION  COSTS 

0436 

V 

1050 

IF! YR.NE . ARRAY! I .23) )  GOTO  1052 

0437 

IF! ARRAY ! I. 13 ) .LE. ARRAY! I .23))  GOTO  1052 

0438 

ARRAY!! .  1 7  )  =  AR  RAY ( I , 16) 

0439 

00  1051  K= 1 ,5 

0440 

ARRAY! I . K  +  1  7 )* OPARR! K . 3 ) 

0441 

1051 

CONTINUE 

0442 

1052 

00  1053  K=1.5 

0443 

SUM=SUM+MARRA Y ( I , K+7 ) * ( OPARR! K . 2 ) "ARRAY!  I , K+ 17)) 

0444 

1053 

CONTINUE 

0445 

SUM=SUM+ARRAY( 1  . 17)' TNSARR ( I .2.2. Y1 ) ' NE  WONM' M ARRAY ( 1,13) 

0446 

IF ! OLDFAC ( I ) -EQ .0. ) 

2  SUMsSUM-f  ARRAY!  1 . 1  7  )  'TNSARR!  I  .  2 . 1  .  VI  )  'OLDONM'MARR  AY  (  1.13) 

0447 

IF! OLDFAC 1 I ) .NE .0. >SUM=SUM+OLDONM'OLDFAC< I >*MARRAY( I .13) 

0448 

DO  1055  K*1  .5 

0449 

1055 

SUM=SUM+| ARRAY! I , K+1 7 ) -OPARR ( K . 1 ) ) » ( MARRAY ( I . K+2 ) • TNSARR! I .2 . 1 .VI ) 
2  +M ARRAY ( I . K+7 ) 'TNSARR! I , 2 , 2 . Y1 ) ) 

0450 

1060 

TSUM* TSUM+SUM 

0451 

1065 

CONTINUE 

0452 

C 

COSTAR( Y1 . 2 ) »  T  SUM/ 1 000 . 

C  COMPUTE  CIRCUIT  COSTS 
C 


0458 

RT2*0PARR( 2.2) 

0454 

I F ( RT2 

EQ.O.O) 

RT2-1 

.0 

0455 

RT 4 =OPARR l 5.2) 

0456 

I F ( RT4 

EQ.O.O) 

RT4-  1 

.0 

Figure  4-1 .  (continued) 


0457 

RT  3-OPARR) 3.2) 

0458 

IFIRT3.E0.O.O)  RT3*1.» 

0459 

RTTWR»S0RT(0PARR(3, 1 J/RT3) 

0460 

RTCTR«SQRT(0PARR)2. 1 ) ) /SORT ( RT2 ) 

0461 

RTFSS*SQRT)0PARR(5. 1 ) )/SQRT ( RT4) 

0462 

L*CKTP*30-29 

0463 

DO  1463  1  =  1 .30 

0464 

00  1462  J-1 . 10 

0465 

SWARR) 1 . J)-CKTARR(L.U) 

0466 

IF(J.LE.2)SWIN0X)I,U) =SWMAP ( L , d ) 

0467 

1462 

CONTINUE 

0468 

1463 

L*  L+1 

0469 

GO  TO) 1 070 . 1 1 70 . 1 270 . 1 370 ) , CKTP 

0470 
0471 
0472 
0473 
0474 
047  S 
0476 
0477 
0478 
0479 
0480 
0481 
0482 
0483 
0484 
0485 
0486 
0487 
0488 
0489 
0490 
0491 
0492 
0493 
0494 
0495 
0496 
0497 
0498 
0499 
0500 
050 1 
0502 
0503 
0504 


C 

C  CIRCUIT  GROUP  1 

C 

1070  SWARR (1.6 )  =  SWA  RRI 1.4) 

SWARR) 1 . 5)=SWARR< 1 .3 )‘SWARR< 1.6) 

SWARR)  2.6)-SMARR(  2.4)»0PARR)  3.2) 

SWARR)  2.5) =SW ARR (  2.3)*SWARR(  2.6)»RTFSS 
SWARR)  3.6) =SW  ARR (  3.4)>OPARR(  5.2) 

SWARR)  3 , 5 ) =SW  ARR (  3.3>*SWARR(  3.6)*RTCTR 
SWARR (  4 . 6 )  =  SW  ARR (  4.4)*0PARR<  3.2) 

SWARR)  4 . 5 ) -SW  ARR (  4.3)*SWARR(  4.6)'RTCTR 
SWARR)  5 . 6 ) =SW  ARR (  S.4)*0PARR|  2.2) 

SWARR)  5 . 5 )  =  SW ARR (  5.3)*SWARR{  5.6)»RTCTR 
SWARR (  6 .6)*=32  2  0+FLTSVC*7  22+26.09»0PARR(2,2) 
SWARR(  6 . 5 ) =SW ARR (  6.3)‘SWARR(  6.6)*RTFSS 
SWARR (7.6)=SWARR(7,4) 

SWARR (7.5)  =  SWARR(7,3)*  SWARRI 7.6) 

SWARR)  8 . 6 ) =SW ARR)  8.4fOPARR(  3.2) 

SWARR)  8 . 5 ) =SW  ARR)  8.3)*SWARR<  8,6)*RTFSS 
SWARR)  9 . 6 )= SWARR)  9.4)‘0PARR<  5.2) 

SWARR)  9.5)-SWARR(  9.3)»SWARR(  9.6)*RTCTR 
SWARR(10.6)=SWARR(10.4)*0PARR(  3.2) 

SWARR) 10.5) *SW ARR) 1 O . 3 ) ‘SW ARR) 1 0 . 6 ) *RTCTR 
SWARR) 1 1  . 6 ) *SWARR) I  1 .4) ‘OP ARR)  2.2) 

SWARR) 11 ,5)sSWARR(11.3) * SWARR) 1 1 .6)»RTCTR 
SWARR (12.6 )= SWARR) 12.4) 

SWARR (12.5 )= SWARR (12.3)*  SWARR) 12.6) 

SWARR) 13 .6)*SW ARR) 1 3 . 4 ) * ARRAY ( 48 . 1 >+(OPARR( 1 . 
SWARR (13.5 )  =SW  ARR) 13.3)*SWARR( 13.6) 

SWARR) 14 .6)* SWARR) 14. 4) ‘OP ARR)  5.2) 

SWARR) 14. 5)s SWARR (14. 3) * SWARR ( 14.6) 

SWARR) 15.6 )= SWARR ( 15,4)‘0PARR(  3.2) 

SWARR) 15.5)=SWARR(15,3) * SWARR) 15,6) 

SWARR) 16.6) *SW ARR) 16.4) *OPARR(  2.2) 

SWARR) 16 .5 )= SWARR) 16.3 )*SWARR( 16.6) 

SWARR) 17.6)*SWARR(17,4) 
SWARR(17.5)«SWARR(17,3)*SWARR(17,6) 

GO  TO  1077 


C 

C  CIRCUIT  GROUP  2 
C 


Figure  4-1 .  (continued) 
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1170  SWARR<1 . 6 )*SWARR( 1 . 4 ) 'OPARRI 3,2) 

SWARRI 1 . 5>*SWARR( 1 . 3  )'SWARR( 1 ,6)»RTFSS 
SWARRI 2 . 6 )« SWARRI 2.4) 'OPARRI 5.2) 

SWARR( 2 . 5 I *SWARR<  2. 3  I 'SWARRI 2.6)'RTCTR 
SMARR (3.6)*SWARR(3.4)'0PARR(3.2) 

SMARRI 3 . 5 )  *SWA  RRI  3 . 3  ) 'SWARRI 3.6)'RTCTR 
SWARRI4. 6)*SWARR<4.4 )'OPARR(2.2> 
SWAfiR<4.5)«SWARR<4.3)'SWARR(4,6>»RTCTR 
SMARR <5 , 6 1*322 . 47 . 22  * F LTSVC+26 . 09*0PARR( 2 .2 > 

SMARR (5,5)*SWARR(5,3)'  SMARR ( 5,6)*  RTFSS 
SMARR (6.4)»SWARR(6.4)'0PARR(5.2) /OPARR (5.1) 

SNARR ( 6. 6  I «SW A RR ( 6 . 4 ) *OPARR( 5.2) 

SMARR (6.5I*SWARR(6.3)'  SWARRI 6,6) ’RTFSS 
SMARR) 7.4)  =  SMARR(7,4i*  OPARR I  3.2) /OPARR (3.1) 

SMARR! 7, 6)=SWARR<7,4 )• OPARR (3. 2) 

SWARR(7.5)=SWARR(7.3)'  SMARRI 7,6)*  RTTMR 
SMARRI 8 . 6  I  =  SNA  RR 1 8 . 4 ) 

SMARRI 8. 5I*SWARR<8. 3 )* SMARR I  8. 6) 

SWARRI 9. 6 )=SWA RRI 9. 4) 'OPARRI 5. 2) 

SMARRI 9. 5)=SWARR<  9. 3 )' SWARRI 9. 6) 'RTCTR 
SMARRI 10.6 )= SWARRI 10.4) 

SWARRI 10 .5) «SWARR( 10.3)*  SWARRI 10,6) 

SMARRI 1 1  . 6 ) «SW ARR( 1 1  . 4 ) *0P  ARR (3.2) 

SWARRI 1 1 . 5 ) =SWARR( 1 t , 3) * SWARRI 1 t ,6)*RTCTR 
SWARRI 12 . 6)=SWARR< 1 2 . 4 ) » OP ARR ( 3 . 2 ) 

SWARRI 12 ,5I=SWARR( 12.3|*SWARR( 12. 6) 'RTCTR 
SWARRI 13 . 6)=SWARR{ 1 3 . 4 ) *0P ARR( 2 . 2 ) 

SWARRI 13 ,5)*SWARR( 13.3) 'SWARRI 13.6)»RTCTR 
SMARR) 14.6 )* SWARRI 14.4) 

SWARRI 14 .5)=SWARR< 14. 3) ‘SWARRI 14.6) 

SWARRI 15  6 )  =  SWARRI 15.4  )'|OPARR( 3 . 2 )+0PARR(5. 2) ) 

SWARR(15.5)=SWARR(15.3)'  SWARRI 15.6 ) ‘SORT I (0PARR(3 , 1 )+0PARR(5. 1  )  )/ 
2  (0°ARR(3.2)+0PASR(5.2))) 

SWARRI 16.6) ^SWARRI 1 6 . 4 ) • ARRAY ( 48 . 1 )*2 . *  I OPARR! 1 . 2 ) -OPARR 1 1 . 1 ) ) 
SWARRI 16 .5)=SWARR( 16. 3) 'SWARRI 16.6) 

SWARRI 17 ,6)-SWARR( 1 7 . 4 ) ’ OP ARR ( 5 . 2 ) 

SWARRI 17 .5) * SWA RRI 17.3)' SWARRI 17.6) 

SWARRI 18.6)*SWARR< 18. 4) 'OPARR! 3. 2) 

SWARRI 18 . 5 ) *SW ARR I  1 8 . 3 ) ' SW ARR ( 1 8 . 6 ) 

SMARRI 19 ,6)=SWARR| 1 9 . 4 ) *  OP ARR I  2 . 2 ) 

SWARRI 19.5 )»SW ARR ( 19. 3) 'SWARRI 19.6) 

SWARR(20.6)=SWARR( 20 . 4 ) 

SMARR 120 . 5 )  =  SW  ARR ( 20 . 3 ) ' SW ARR ( 20 , 6 ) 

SWARRI21 ,6)=SWARR(21 ,4) 

SW ARR ( 2 1 . 5 ) =SwARR( 2! ,3)*SWARR(2t .6) 

GO  TO  1077 

C 

C  CIRCUIT  GROUP  3 

1270  SWARR1 1 . 4  l«SWARR( 1 . 4 ) 'OP ARR ( 3 , 2 ) /OpIrRI 3 . 1 ) 

SWARRI 1 . 6 l«SWARR( 1 . 4 ) ‘OPARR I  3 . 2 ) 

SWARRI I . 5)*SWARR< 1 .3) 'SWARRI 1 .6) 'RTTWR 
SWARRI 2 . 6) -SNARR! 2. 4 ) 'OPARR (3. 2) 

SWARW(2.5)*SWARR(2.3) 'SWARRI 2 .6 ) 'RTCTR 


Figure  4-1 .  (continued) 
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0597 

0598 

0599 

0600 

0601 

0602 

0603 

0604 

0605 

0606 

0607 

0608 


SWARR! 3 . 6 
SWARR(3 . 5 
SWARR14 , 6 
SWARR ( 4 . 5 
SWARR! 5. 6 
SWARR (5,5 
SW ARR (6.6 
SWARR( 6 , 5 
SWARR (7,6 
SWARR( 7 , 5 
SWARR(8 , 6 
SWARR! 8 . 5 
SWARR ( 9 , 6 
SWARR(9 . 5 
SWARR! 10. 
SWARR! 10 . 
SWARR!  1  1  . 
SWARR! 1 1 . 
SWARR! 12 . 
SWARR! 12 . 
SWARR! 1 3 . 
SWARR! 13. 
SWARR! 14. 
SWARR! 14 . 
SWARR! 15 . 
SWARR (15. 
SWARR! 16 . 
SWARR! 16 . 
SWARR!  17. 
SWARR( 1 7 . 
SWARR! 18. 
SWARR! 18 . 
SWARR (19. 
SWARR! 19 . 
SWARR ( 20 . 
SWARR (20. 
SWARR ( 20 . 
SWARR! 2 1  . 
SW ARR ( 2 1  . 
SWARR (22 
SW ARR ( 22 
SWARR ( 23 
SWARR! 23 
SWARR! 24 
SWARR! 24 
SWARR! 25 
SWARR! 25 
SWARR ( 26 
SWARR ( 26 
SWARR! 27 
SWARR ( 27 
SWARR! 26 
SWARR! 28 
SWARR! 29 


|  * SWARR! 3.4) 'OPAR  R !  3 . 2  ) 

MSWARR(3.3)' SWARR ( 3 ■ 6 ) *RTCTR 

)'SWARR(4,41*0PARR(3,2) 

)*SWARR(4.3)*SWARR(4.6) *RTTWR 
)  =  1  . 362  * APTOPN 

)  -  SWA  RR ( 5 . 3  )  *  SWAR  R  ( 5 , 6 ) 

)*  0 . 695*  APTOPN 

)  'SWARR! 6.3) "SWARR ( 6.6) 

|=SWARR(7.4)*0PARR(3,2) 

)*SWARR(7.3)*  SWARR ( 7,6) 

)'SWARR(8.4)*0PARR(3.2> 

)=SW ARR l 8. 3)  "SWARR (8. 6) 

)*SWARR(9.4)*0PARR(3.2) 

)*SWARR(9.3)*SWARR(9.6) ♦RTTWR 
6 )  'SWARR ( 10. 4) 'OPARR (3. 2) 

5 ) 'SWARR! 10. 3  I 'SWARR! 10.6) 

6  )  =  SWARR ( 1 1  . 4  )  'OPARR! 2,2) 

5)=SWARR( 1 1 . 3) 'SWARR! 1 1 .6)*RTCTR 
6  )*SW ARR! 12. 4 ) 'OP ARR (5. 2) 

5)  'SWARR! 1 2 . 3) 'SWARR! 12 ,6)*RTCTR 

6) =SWARR( 13 .4 )'0PARR(2 , 2) 

5 )  =SW ARR! 13.3)'SWARR(13.6)*RTC7R 

6 )  'SWARR ( 1 4 . 4 ) ' AR  RAY ( 48 . 1 )+2 . » ( OPARR! 1.2) • OPARR ( 1 . 1 ) » 
5  )  =  SWARR( 14.3)' SWARR! 14.6) 

6) 'SWARR! 15. 4) 'OP ARR! 2. 2) 

5  )  -SWARR ( 1 5 . 3)'SWARR( 15.6) 

6)=SWARR< 1 6  4 )'0PARR|4 . 2) 

5 )  'SWARR (16.3)' SWARR (  16 ,6)*RTCTR 

6) =SWARR(17.4)'0PARR(1 .2) 

5)  -SWARR (17. 3) 'SWARR! 17.6)*RTC1R 

6 )  'SWARR! 18.4  > 'OPARR (2.2) 

5 )  =  SW  ARR ( 18. 3 ('SWARR I  18 ,6)»RTCTR 

6  )  =  SwARR( 19. 4) 'OPARR! 2. 2) 

5) 'SWARR! 19. 3) 'SWARR! 19.6)*RTCTR 
.  4 l*SWARRI 20 . 4 ) 'OP ARR! 5 . 2 )/QPARR(5. 1 ) 

.6) 'SWARR! 20. 4) 'OP ARR!  5. 2) 

5 ) *SWARR( 20 . 3 ) 'SWARR! 20 ,6(*RTFSS 
.6)'SW4SR<2» . 4 ) 'OPARR!  5 , 2 ) 

5 ) =SW  ARR ( 2 1  . 3  )  'SWARR! 2 1  ,6)*RTFSS 
,61'  (5. 8t'(APT0PN- INSTOP) 

5)*SWARR(22.3)'SWARR(22.6)*RTFSS 
,6)=0PARR(5. 2)+7.22'FLTSVC 
,5)*SWARR(23.3)'SWARR(23.6)'RTFSS 
.  6  )'SW ARR! 24. 4) 'OPARR I  5. 2) 

,5)=SWARRI24.3)'SWARRI24.6)'RTFSS 

,fj)*SWARR(25.4)'0PARR(5.2) 

. 5 )*Sw ARR! 25 . 3 ) ' SWARR! 25 . 6 )*RTFSS 
. 6 )  =  SW ARR! 26. 4  I 'OPARR! 5. 2) 

,5)'SWARR(26.3)'SWARR(26 .6)*RTFSS 
. 6) =SWARR (27.4 )'0P ARR! 5. 2) 
,5)*SWARR(27.3)*SWARR(27.6)*RTFSS 

, 6 )=SWARR( 28 . 4 ) 

.5)* SWARR (28. 3)*  SW ARR( 28 .6) 

, 6) “SWARR (29 . 4 ) 


Figure  4-1.  (continued) 
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0645 
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0649 
0650 
0651 
0652 
0653 

0654 

0655 

065 G 
0657 


SWARR) 29 . 5 ) *Sty ARR) 29 . 3 ) 'SWARR) 29 .6) 

GO  TO  1077 
C 

C  CIRCUIT  GROUP  4 
C 

1370  SWARRI1 .6I=SWARR(1.4)'0PARR(5.2) 

SWARR( 1  . 5>=SWARR( 1 .3  )'SWARR( 1 .6) 'RTFSS 
SW ARR (2.6)*SWARR(2.4) 'OPARR ( 3.2) 

SWARR (2.5)*SWARR(2.3)'  SWARR ( 2,6)*  RTTWR 
SWARR(3,6)*SWARR(3.4)'0PARR(2.2) 

SWARR (3.5)*SWARR(3.3)'  SWARR ( 3 , 6 ) *RTCTR 
SWARR (4 . 6 )= SWARR) 4 . 4 ) 

SWARR) 4. 5)=SWARR(4.3)'SWARR(4.6) 

SWARR ( 5 .6)sSWARR|5.4) 

SWARR) 5. 5)=SWA»Rf 5.3)'SWARR(5.6) 

SWARR) 6. 6I=SWARR)6.4 >' OPARR I  3.2) 

SWARR) 6 . 5  )  *SWA RR f  6 . 3 ) * SWARR I  6,6) 

SWARR) 7,61*  10.065' APTOPN 

SWARR) 7. 5  I  =  SWARR) 7. 3 ( 'SWARR) 7. 6) 

SWARR (8 . 6)=SWARR(8.4 )' OPARR (5. 2) 

SWARR ( 8,5I=SWARR(8,3)' SWARR) 8,6|'RTTWR 
SWARR(9.6)=SWARR(9.4)*0PARR(3.2) 

SW ARR ( 9 . 5 ) *  SW A  RR ( 9 . 3 ) * SWARR ( 9.6)'RTCTR 
SWARR) 10 . 6 ) =SW ARR) 10 . 4 ) 'OPARR) 3 . 2 ) 
SWARR<10.5)*SWARR(10.3)*SWAKR(10.6)'RTCTR 
SWARR) 1 1 ,4)*SWARR( 1 1  . 4 ) ' OP ARR ( 3 . 2  ) /OPARR) 3 . 1  ) 

SWARR) 11  . 6 ) =SW ARR) 1 1  . 4  )  'OPARR) 3 . 2 ) 

SWARR) 1 1 .5 )=SWARR( 1 1 .3) 'SWARR) 1 1 .6) 'RTTWR 

SWARR) 12 . 6 ) *SW  ARR) 12.4)*ARRAYI48.1 >+2 . * (OPARR) 1 . 2 ) -OPARR ) 1 . 1 J ) 
SWARR) 12. 5)- SWARR) 12 .3)* SWARR) 12.6)'RTCTR 
SWARR) 1 3 . 6 ) =SW ARR) 1 3 . 4 ) 'OPARR) 3 . 2 ) 

SWARR) 13.5) =  SW  ARR) 1 3 . 3 ) ' SWARR ) 1 3 . 6 ) *RT  TWR 
SWARR) 14.6)*SWARR(14.4)'0PARR(2.2) 

SWARR) 14.5 )* SWARR) 14 .3)*SWARR( 14.6) 

SWARR) 15 ,6)=SWARR( 15 .4) 'OPARR) 5. 2) 

SWARR (15.5 )* SWARR) 15.3) 'SWARR) 15. 6) 'RTFSS 

SWARR (16. 6)*0PARR (5. 21  +  7.22' F  LT  SVC+26 . 09* OP ARR) 2 . 2 ) 

SWARR (16.5 )= SWARR (16.3)*  SWARR) 1 6 . 6 ) 'RTFSS 
SWARR ( 1 7 . 6 ) *SWARR( 17.4) 

SWARR) 1 7 . 5 ) =SW ARR) 17.3 ) 'SWARR) 1 7.6) 

SWARR) 18 .6I=SWARR< 18.4) 

SWARR(18.5)=SWARR(18.3) 'SWARR  (18.6) 

SWARR) 19 ,6)=SW ARR) 19.4) '(OPARR) 3 . 2 l+OPARR) 5 , 2 ) ) 

SWARR) 19.5 ) : SWARR (19.3)' SWARR ( 1 9 . 6 ) *RT TWR' RT FSS 
SWARR (20 . 6 )=SW ARR) 20. 4) 'OP ARR (4. 2) 

SWARR) 20 , 5 )  =  SW  ARR ( 20 . 3 ) *  SWARR ( 20 . 6 ) 

SWARR) 21 , 6 ) *SWARR ( 2 1 .4) 

SWARR) 2 1  . 5 ) *SW  ARR ( 2 1  ,3)'SWARR(21  .6) 

C  ESTIMATE  SWITCH  REQUIREMENTS 
1077  DO  1078  1*1.30 

SWARR) 1.8)  =  SWARR) I . 7 ) ' SWARR) 1.6) 

C  1.5312  REPRESENTS  GROWTH  AND  INFLATION  SINCE  1976 

COSTAR) Y1 ,4)*C0STAR(Y1 ,4)+SWARR( I .6) 'SWARR) I. 9)*12. '1.5312 
1076  CONTINUE 
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0676 
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0678 
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0685 

0686 

0687 

0688 

0689 

0690 

0691 

0692 

0693 

0694 

0695 

0696 


0697 

0698 

0699 

0700 


00  1 080  1*1.30 

I F ( SWARRI I . 1 ) . NE  .  1  .  )  GO  TO  10B0 
DO  1079  d*1  .2 
K*  SW INDX (  I  .  d  ) 

1FIK.E0.O)  GO  TO  1079 

SWARRIK.4)  >  SWARRIK. 4)*(SWARR(K,6 )+SWARR I  I ,6) )/5WA  RR( K , 6  J 
SWARR(K.S)  *  SWARR(K,5)*( SW ARR( K . 6 l+SWARRI 1,6) ) /SWARRIK. 6 ) 
SWARRIK. 6)  «  SWARRIK , 6 l+SWARRI 1,6) 

SWA RR ( K . 8  )  •  SW ARR ( K . 8 )+ SWARR (1.8) 

SWARRI K . 7 )  *  SWARR(K.8)/SWARR(K,6) 

SWARR ( K . 1 0 )  *  AMIN1 ( SWARRIK . 10) , SWARRI I , 10) ) 

SWARR( 1.2)  *  • 1 . 

1079  CONTINUE 

1080  CONTINUE 
END  1ST  *  O. 

00  1085  K*1 .30 

IF  (  SWARRI  K.2) .  LT  .1).  )  GO  TO  1086 
I F ( SWARRI K. 1 ) .NE. 1 . )  GO  TO  1084 
C 

C  DETERMINE  NUMBER  OF  CIRCUITS  REQUIRED  IN  SWITCHED  SYSTEM 
C 

00  =  A LOG ( AMAX 1  (SWARRIK.4)*  SWARR I K , 7 ) , O . 1 ) ) 

GG  >  A LOG I AMAX 1  ( SWARRI K , 10 ) *  1 00000 ..0.1)) 

CKTS  *  EXPI 1.506  ♦  0.39919*00  +  0 . 08158*00*00 
2  +  0. 1 1892*GG  -  o . 01 709*GG*GG ) 

CKTS  *  AM  INI (SWARR(K,4) .CKTS) 

CKTS  *  AMAX1(SWARR(K.4 )* SWARRI K . 7 ) . CKTS ) 

SWARRIK. 5)  =  SWARRIK, 5) 'CKT S/SWARRI K . 4 ) 

SWARRIK. 61  =  SWARRIK. 6 ) *CKT S/SWARRI K , 4) 

SWARRIK.4)  =  CKTS 

ENOIST  *  ENDIST  ♦  SWARRIK. 6) 

C 

C  ADD  AVERAGE  IXC  COST  PER  CIRCUIT 
C 

1084  DO  1095  1*1.9 

IF!  IFIX(SWARR(k.2)).NE  I)  GO  TO  11)95 

CCS  T  AR ( Y 1  ,3)*C0STAR( Y1 , 3 )  +  T  RF ARR ( I . 1 ) • SWARRI K . 5 ) *  1  2 . 

2  +TRF ARR (1.2 ) *SWARR( K . 6 ) *1 2 . 

1095  CONTINUE 

1086  IF(SWARR(K.2).GT.0. )  GO  TO  1085 
DO  1088  L  =  3 . 9 
1088  SWARRIK. L)  *  0. 

1085  CONTINUE 

IF( IFIX(VR) . EQ  .STRTYR)  COS  TAR ( Y1  . 1 )«COSTAR( Y1 . 1 (-fENDIST » 0 . 000500 
I F ( I F I X  I YR) . GE  .STRTYR)  C0STAR(Y1  .  2  )  *COST AR ( Y 1  . 2 J  +  ENDIST *0 . 000030 
COST  AR( Y 1 . 3 )  *  COSTAR  I Y 1 . 3 ) /I ■ E6 
COST AR( Y 1  . 4 )  *  COSTARI Y1 .4 )/1 . E6 

c 

C  SWITCH  ARRAY  REPORT 
C 

IF! RPTYPI 7) ,NE . 1  )  GOTO  1099 
WR1TEI5, 1097) 

1097  FORMAT! ' 1 ' .50X . 'SWITCH  ARRAY', SOX) 

WRITEI5. 1098)  ( I SWARRI I. d)  . d« 1 . 1 0 ) . I *  1  . 30 ) 


Figure  4-1.  (continued) 
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0701 


1098  FORMAT (10(3X,F10.2)) 

C 

C  COMPUTE  LEASED  EQUIPMENT  COSTS 
C 


0702 

1099 

COSTAR(Y1 , 4 ) *COSTAR( Y1 ,4)  +  5.467  +  0 . 6478*ARRAY( 4 . 1 ) 

2  +0. 0299*ARRAY(7, 1 )  +  0.00797*ARRAY(25, 1 ) 

0703 

COSTAR( Y1 ,5)=UASGN(Y1 ) 

C  MAIN  ARRAY  REPORT 

0704 

V 

IF(RPTYP(8).NE.1)  GOTO  1104 

070S 

WR I TE ( 5 , 1100) 

0706 

1100 

FORMAT( 1 1 ' ,53X . 'MAIN  ARRAY1//) 

0707 

DO  1103  1*1,95 

0708 

WRITE (5, 1 101 )I , NAMARR ( I ) , (ARRAY ( I ,d) ,d=1 ,23) 

0709 

1101 

FORMAT ( 1 0‘ . 12, 2X.A4, 1 2 ( 2  X , F7.2) ./.9X.1 1 (2X.F7.2)) 

0710 

1103 

CONTINUE 

0711 

1104 

I F ( YR . EQ . FLOAT ( ENDYR ) )  GOTO  1130 

0712 

YR=YR+1 . 

0713 

DO  1105  1=1,5 

0714 

OPARR ( I . 3)=0PARR( 1,2) 

0715 

1105 

CONTINUE 

0716 

GOTO  999 

0717 

1130 

K=ENDYR-7B 

0718 

DO  1 1 40  I  =  1  ,  K 

0719 

DO  1141  d  =  1  ,1 

0720 

COSTAR( I , 1 ) =C0 ST AR( 1 , 1 )*( 1 ,  +  IFE  (d) ) 

0721 

COSTARU , 2 ) *C0 STAR ( I , 2 ) * ( 1 ,  +  IOM  (d)) 

0722 

COSTAR (I , 3 ) =COSTAR ( I , 3 ) * ( 1 .+ICKT(d)) 

0723 

COSTAR (I , 4 ) «COSTAR ( I , 4 ) * ( 1 .+ICKT(d)) 

0724 

COSTAR(I ,5) =COSTAR( I ,5) * ( 1 .+IFE(d)/2.+I0M(d)/2. ) 

0725 

1141 

CONTINUE 

0726 

1140 

CONTINUE 

c 

C  COST  SUMMARY  REPORT 


0727 

C 

175 

IF(RPTYP(1).EQ.0)  GOTO  188 

0728 

WR  I  TE ( 5 , 183) 

0729 

183 

FORMAT( ' 1 ' .40X, 'COSTS  BY  CATEGORY-ALL  AMOUNTS  IN  MILLIONS  OF  DOU 

2ARS  '  .//,  '  1  ,9X,  ‘FACK.ITIES'  ,5X,  ‘OPERATIONS’  ,68X,  •  Nt T  1  , BX ,  'CUIWULAfi 

3VE '  ,  /  .  :  YEAR' ,9X, ‘AND’ , 12X, 'AND' ,25X, 'LEASED' , 10X, ' USER' ,10X, 

4 

'TOTAL'  , 9X , 'PRESENT' ,5X, 'NET  PRESENT' ,/, 1 1X, ' EQUIPMENT  '  ,4X, 

5 

'MAINTENANCE' , 5X , 'CIRCUITS' ,7X, ' EQUIPMENT* ,6X, 'ASSIGNED'  ,24X, 

6 

'VALUE' ,9X, 'VALUE' ,/, 1X,66( '-  * ) ) 

0730 

188 

SUM=0. 

0731 

Y*STRTYR  + 1 900 

0732 

d=STRTYR-78 

0733 

K  =  ENDYR- 78 

0734 

189 

DO  200  I =d,K 

0735 

» 

TOT ( I ) =COST AR(  1 , 1 )+COSTAR( I , 2 )+COSTAR( I , 3 )+COSTAR( 1 ,4)«- 
COSTAR(I ,5) 

0736 

NPV(I)  »  TOT ( I  ) 

0737 

I F ( I . EQ. 1  )  SUM  »  TOT ( I ) 

0738 

IF(I.EQ.  1  )  GO  TO  190 

Figure  4-1.  (continued) 


0739 
0740 
074 1 
0742 
0743 
0744 
0745 


0746 

0747 

0748 

0749 

0750 

0751 

0752 

0753 

0754 

0755 

0756 

0757 

0758 

0759 

0760 

0761 

0762 


0763 

0764 

0765 

0766 


OC'0 1 
0002 
0003 
0004 
0005 
0006 
0007 
0008 
0009 
(Ml  1  0 
001  1 
0012 
(Mil  3 
(Mil  4 


DO  191  J -2  ,  I 

191  NPV(l)  *  NPV(I  )/(1.  +  lDIS(J)) 

SUM=SUM+NPV( I ) 

190  WR I  TE ( 5 , 1 95) Y , (COSTAR( I , 0 ) , d*1 , 5 ) . TOT ( 1 ) ,NPV( I) ,SUM 
195  FORMAT ( 1  O' . IX, I4,2X,8( '$' , F8.1 ,6X) ) 

197  Y=Y  +  1 

200  CONTINUE 

C 

C  SHORT  COST  SUMMARY 
C 

398  I F ( R PT YP ( 2 ) . NE  .  1  )  GOTO  442 

400  WR ITE(5,415) 

415  FORMAT( 1 1 1 ,25X, 'YEAR1 ,24X,  ‘TOTAL' .20X,  ’NET  PRESENT  VALUE 1 ,/,82X , 
2  ' (MILLIONS) ' ,/ , 1X.66( ' ) ) 

Y  =  S  TRTYR  + 1 900 
d=STRTYR-78 
K*ENDYR-78 

430  DO  440  I  =  d  ,  K 

WR 1 T  E ( 5 , 435 )  Y , TOT ( I ) , NPV( 1 ) 

435  FORMAT  (  1  0 1 , 25X , 14 , 22X , ' $ ‘ , F9.4.20X, ,F9.4) 

Y  =  Y  +  1 

440  CONTINUE 

442  I F ( RPT YP ( 5 ) .NE . 1  )  STOP 

WR I TE ( 5 , 444 ) 

444  FORMAT( '  1 '  ,64X  , 'TARIFF  MATRIX*. 10X) 

446  WR I TE ( 5 , 448 )  (  I  ,  ( TRFARR ( I , d ) , d  =  1  , 2 ) , I « 1 , 9 ) 

448  FORMAT ( 1  ' , I 1 , 5X , ‘ COST  s  S' , F6 . 2 , 5X ,' SERVICE  «  $',F6.2) 

450  STOP 

C 

C  FORMAT  statements  for  the  definition  of  input  changes 

c 

700  FORMAT ( ' O' ,5X, A4, 10X, 10A4, FI  6. 2. FI  5. 2, F9.0) 

900  WR I TE ( 5 , 905 )  CT 

905  F0RMAT(5X, ' ERROR-CARD  TYPE  IS  NOT  EQUAL  1-9,  PROGRAM 
#  NOT  EXECUTED  CTs  '.11) 

END 


C  this  SUBROUTINE  STORES  AND  RETRIEVES  ALL  TRANSITION  INFORMATION 
FUNCTION  TNSARfll I .d.K.L) 

INTEGER  TNI NOX ( 1 000 ) 

REAL  TNVALU(IOOO) 

COMMON  NTN.TN1NDX.TNVALU 
INDEX  s  120*1  *  60* d  +  3()*K  ♦  L 
TNSARR  =  () . 

IF  ( K . EO . 1 )  TNSARR* 1 . 

DO  10  Ns  1  ,  NTN 

IF( TNINDX(N) ,NE . INDEX)  GO  TO  10 
TNSARRsTNVALU(N) 

RETURN 

10  CONTINUE 
RETURN 
END 


Figure  4-1 .  (continued) 
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Table  4-1.  SUMMARY  OF  SOURCE  LISTING  FUNCTIONS  (MAINPGM) 


Program 

Lines 

Function 

1-28 

Variable  definition  and  dimensioning;  clear  all  array 
elements 

29-31 

F&E  data  base 

32-56 

O&M  data  base 

57-63 

Data  for  main  array 

64-67 

Computed  data  for  main  array 

68-70 

Data  for  circuit  array 

71-73 

Data  for  facility  names  and  report  labels 

74-75 

Tariff  data  base 

76-92 

Initialize  portions  of  F&E ,  O&M  and  main  arrays 

93-106 

Read  first  data  card;  error  check  and  branch  appropriately 

107-118 

F&E  input 

119-141 

O&M  input 

142-144 

Circuit  parameters  (not  used) 

145-184 

Transition  parameters 

185-192 

Tariff  input 

193-203 

User  assigned  costs 

204-252 

Interest  and  automation  factors 

253-265 

Circuit  and  switching  data 

266-278 

Analysis  period  and  reports 

279-284 

Update  main  array 

285-297 

Formats  and  definitions  for  F&E  and  O&M  reports 

298-325 

Initialize  report  period  and  OPARR 

326-358 

Compute  requirements  due  of  traffic  growth 

359-384 

Compute  pre-transition  F&E  costs 

385-424 

Compute  post-transition  F&E  costs 

425-435 

Compute  pre-transition  O&M  costs 

436-452 

Compute  post-transition  O&M  costs 

453-469 

Initialize  parameters  for  circuit  costs 

470-504 

Calculations  for  circuit  type  1 

505-549 

Calculations  for  circuit  type  2 

550-610 

Calculations  for  circuit  type  3 

611-653 

Calculations  for  circuit  type  4 

654-684 

Compute  switch  requirements 

685-696 

Compute  IXC  costs 

697-701 

Switch  array  report 

702-703 

Calculate  leased  equipment  and  user  assigned  costs 

704-710 

Main  array  report 

711-716 

Update  arrays  for  next  analysis  year 

717-726 

Compute  inflation 

727-744 

Cost  summary  report 

745-755 

Short  cost  summary  report 

756-761 

Tariff  report 

762-765 

Format  statements  and  diagnostics 

\ 

I 

ftMlf'"'— - - 
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Figure  4-2.  (continued) 
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Table  4~2 .  OPERATIONS  AND  MAINTENANCE  DATA  BASE 


Facility 

(I) 


1. 

ADCOC 

2. 

AID 

3. 

ARSR 

4. 

ARTCC 

5. 

ARTS 

6. 

ASR 

7. 

ATCT 

8. 

BDIS 

9. 

BUEC 

10. 

CCC 

11. 

CD 

12. 

CDC 

13. 

CERAP 

14. 

CKT 

15. 

CMLT 

16. 

COMCO 

17. 

CST 

18. 

CTRB 

19. 

DCC 

20. 

DF 

21. 

EDPS 

22. 

FAC 

23. 

FDEP 

24. 

FM 

25. 

FSS 

26. 

GS 

27. 

H 

28. 

HH 

29. 

IATSC 

30. 

IFSR 

31. 

IFSS 

32. 

IFST 

33. 

IM 

34. 

LCOT 

35. 

LDA 

36. 

LMM 

37. 

LNKR 

38. 

LOC 

39. 

LOM 

40. 

LRCO 

41. 

MM 

42. 

OAW 

43. 

OM 

1  44‘ 

ORES 

45. 

PAR 

46. 

RAP  CO 

47. 

RBDE 

j  40. 

RCAG 

49. 

RCO 

50. 

RMLR 

51. 

RMLT 

52. 

RTR 

53. 

SFO 

54. 

SSO 

55. 

TELEX 

56. 

TOWB 

57. 

TRACO 

58. 

TRCAB 

59. 

TROPO 

60. 

TTS 

61. 

TTY 

62. 

VOR 

63. 

VOT 

64. 

WMSC 

Cost  Per 
Facility  (In 
Thousands  of 
Dollars) 


Cost  Increases  (In  Thousands  of  Dollars) 


Percent  of 
CoM»uni  cat  ions 


MARRAY  (1,1)  |  MARRAY  (1,3)  MARRAY  (1,4)  MARRAY  (1,5)  MARRAY  (1,6)  MARRAY  (1,7)  I  MARRAY  (1,13) 


CHAPTER  FIVE 


SYMBOLS 


All  symbols,  variables,  and  arrays  appearing  in  the  model  equations 
(Chapter  Three)  and  in  the  program  listing  (Section  4.3)  are  summarized 
and  described  in  this  section 

Table  5-1  defines  scalar  variables;  Table  5-2  is  a  summary  of  all 
subscripted  variables  used  in  the  program  listing  and  equation  definition. 

Tables  5-3  through  5-10  define  the  parameters  used  in  each  of  the 
major  arrays. 
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Table  5-1.  SCALAR  QUANTITIES 


APOGRO 

Airport  operations  growth  rate 

APTIN 

Total  airport  operations  (if  user  input) 

APTOPN 

Total  operations  at  airports  forecast 

AT 

Transition  factor  F&E  or  O&M 

AUTOAS 

Terminal  radar  productivity  factor 

AUTOCN 

Center  productivity  factor 

AUTOFS 

FSS  productivity  factor 

AUTOSE 

Sector  productivity  factor 

AUTOTW 

Tower  productivity  factor 

AVNEW 

New  technology  equipment  in  place 

B 

Local  variable 

CKTP 

Circuit  type 

CRTS 

Used  to  compute  total  circuits 

CST 

Average  cost  per  mile  per  month 

CT 

Card  type 

CTFE 

Literal  "FE" 

ENDIST 

Used  to  compute  local  distribution  requirements 

ENDYR 

Last  year  of  analysis  period 

FENEW 

FSE  expenditures  on  new  technology  equipment 

FEOLD 

F&E  expenditures  on  old  technology  equipment 

FLTIN 

Flight  services  in  millions  (if  user  input) 

FLTSVC 

Total  flight  services  forecast 

FRSTYR 

Year  transition  will  begin 

FSVGRO 

Flight  services  growth 

FT 

Facility  type 

GG 

Local  variable 

I 

Local  variable 

IFRGRO 

IFR  operating  growth 

IFRIN 

IFR  traffic  volume  (if  user  input) 

IFRTFK 

IFR  traffic  forecast 

INDEX 

Subscript  for  transition  data 

INOGRO 

Instrument  operations  growth 

INS  IN 

Instrument  operations  at  airports  (if  user  input) 

INSTOP 

Instrument  operations  at  airport  forecast 

11 

Local  variable 

Table  5-1.  (continued) 


J 

JJ 

K 

KX 

L 

LENGTH 

LIFE 

NODE 

N 

NEWONM 

NSTAR 

NTN 

OLDONM 

PERCOM 

QQ 

RTCTR 

RTFSS 

RTTWR 

RT2 

RT3 

RT4 

SECTOR 

STRTYR 

SUM 

SVC 

TSUM 

TT 

U 

V 
W 

Y 

YR 

Yl 

Y2 


Local  variable 
Local  variable 

Local  variable 
Local  variable 

Local  variable 

Total  length  of  circuits 

Equipment  life 

Transition  mode 
Local'  variable 

OSM  cost  for  new  technology  equipment 
Indicates  command  continuation  on  second  card 
Number  of  transition  parameters  stored 

O&M  cost  for  old  technology  equipment 

Percent  communication 

Local  variable 

Average  length  factor  of  center  circuits 
Average  length  factor  of  FSS  circuits 
Average  length  factor  of  tower  circuits 
Local  variable 
Local  variable 
Local  variable 

Number  of  radar  sectors  in  1978  if  different  from  the  default 
value  of  740 

First  year  of  analysis  period 
Local  variable 

Average  cost  per  month  for  termination  of  both  circuit  ends 
Local  variable 

One-digit  number  representing  a  tariff  schedule 
Local  variable 

Percent  or  percent  change  during  transition 

Initially  set  to  0 

Local  variable 
Current  year 

Array  index  for  current  year 
Array  index  for  previous  year 


Table  5-2.  SUMMARY  OF  SUBSCRIPTED  VARIABLES 


A 

ARRAY 

CH 

CKTARR 

CKT1 

CL 

CNPV 

COL 

COSTAR 

ELIFE 

FARRAY 

FELBL 

ICKT 

IDIS 

IFE 

IOM 

MARRAY 

NAMARR 

NPV 

OLDFAC 

OMLBL 

OPARR 

REP 

RPTYP 

SWARH 

SWMAP 

SWINDX 

TNINDX 

TNVALU 

TOT 

TRFARR 

UASGN 

WGRATE 


Percentage  of  transition  applicable  each  year  (up  to  10) 

Main  program  array  of  facility  types  and  parameters  (see 
Table  5-3) 

New  value  for  special  category 
Circuit  array 
Extension  of  CKTARR 

Category  number  to  be  changed  (up  to  14) 

Cumulative  net  present  value 
Dummy  array  used  for  reading  cards 
Cost  output  array  (see  Table  5-4) 

Equipment  life 

F&E  parameter  array  (see  Table  5-5) 

F&E  label  matrix 

Inflation  rates  applied  to  all  leased  costs  including  circuits 
Discounting  factors 

Inflation  rates  applied  to  all  F&E  costs 
O&M  inflation 

O&M  parameter  array  (see  Table  5-6) 

Name  array  contains  translation  for  facility  types 
Net  present  value 

Old  technology  facilities  required  to  meet  demand 
O&M  label  matrix 

Operational  units  array  (see  Table  5-7) 

Local  array  reads  in  reports  to  be  generated 
Selects  one  of  eight  types  of  report  for  output 

Switching  array  (see  Table  5-8) 

Switch  map  —  indicates  circuit  groups  effected  by  switching 
Subset  of  SWMAP 

Average  transition  index 
Average  transition  value 
Total  cost 

Traffic  tariff  array  (see  Table  5-10) 

User  assigned  costs,  by  year 
Wage  rate 


Table  5-3.  ARRAY  PARAMETERS* 


ARRAY  (I**,l) 

Facility  requirements  in  current  year  (quantity) 

ARRAY  (1,2) 

Increase  in  number  of  facilities  per  additional  sector 

(current  year) 

ARRAY  (1,3) 

Increase  in  number  of  facilities  per  additional  center 

(current  year) 

ARRAY  (1,4) 

Increase  in  number  of  facilities  per  additional  tower 

(current  year) 

ARRAY  (1,5) 

Increase  in  number  of  facilities  per  additional  terminal 

radar  (current  year) 

ARRAY  (1,6) 

Increase  in  number  of  facilities  per  additional  FSS 

(current  year) 

ARRAY  (1,7) 

Facility  requirements  for  previous  year 

ARRAY  (1,8) 

Increase  in  number  of  facilities  per  additional  sector 

(previous  year) 

ARRAY  (1,9) 

Increase  in  number  of  facilities  per  additional  center 

(previous  year) 

ARRAY  (1,10) 

Increase  in  number  of  facilities  per  additional  tower 

(previous  year) 

ARRAY  (1,11) 

Increase  in  number  of  facilities  per  additional  terminal 

radar  (previous  year) 

ARRAY  (1,12) 

Increase  in  number  of  facilities  per  additional  FSS 

(previous  year) 

ARRAY  (1,13) 

Transition  year  (last  two  digits) .  Set  to  100  unless 

there  is  a  transition 

ARRAY  (1,14) 

Number  of  facilities  in  baseline  system  (1978) 

ARRAY  (1,15) 

Number  of  facilities  required  in  current  year 

ARRAY  (1,16) 

Number  of  facilities  required  in  previous  year 

ARRAY  (1,17) 

Number  of  facilities  required  prior  to  transition 

ARRAY  (1,18) 

Number  of  sectors  prior  to  transition 

ARRAY  (1,19) 

Number  of  centers  prior  to  transition 

ARRAY  (1,20) 

Number  of  towers  prior  to  transition 

ARRAY  (1,21) 

Number  of  terminal  radars  prior  to  transition 

ARRAY  (1,22) 

Number  of  FSSs  prior  to  transition 

ARRAY  (1,23) 

Year  of  transition  (set  to  100  unless  there  is  a 

transition 

|  *This  array  provides  for  95  facility  types  with  23  parameters  for  each  1 

I  facility  type 

• 

|  **I  »  facility  type  code,  1-95.  j 
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Table  5-4.  COSTAR  PARAMETERS* 


COSTAR  (Y,l) 

Total  F&E  cost  with  inflation 

COSTAR  (Y,2) 

Total  O&M  cost  with  inflation 

COSTAR  (Y, 3) 

Total  circuit  cost  with  inflation 

COSTAR  (Y,4) 

Total  leased  equipment  cost  with  inflation 

COSTAR  (Y, 5) 

Grand  total 

1  *This  array  contains  the  cost  outputs  of  the  model  for  each 

|  analysis  year. 

Table  5-5.  FARRAY  PARAMETERS* 

FARRAY  (I**,l) 

Total  cost  of  an  old  facility 

FARRAY  (1,2) 

Total  cost  of  a  new  facility 

FARRAY  (1,3) 

Old  facility  cost  increase  per  sector 

FARRAY  (1,4) 

Old  facility  cost  increase  per  center 

FARRAY  (1,5) 

Old  facility  cost  increase  per  tower 

FARRAY  (1,6) 

Old  facility  cost  increase  per  terminal  radar 

FARRAY  (1,7) 

Old  facility  cost  increase  per  FSS 

FARRAY  (1,8) 

New  facility  cost  increase  per  sector 

FARRAY  (1,9) 

New  facility  cost  increase  per  center 

FARRAY  (1,10) 

New  facility  cost  increase  per  tower 

FARRAY  (1,11) 

New  facility  cost  increase  per  terminal  radar 

FARRAY  (1,12) 

New  facility  cost  increase  per  FSS 

FARRAY  (1,13) 

Percent  of  cost  due  to  communications 

FARRAY  (1,14) 

Total  number  of  facilities 

*FARRAY  lists  all  of  the  F&E  parameters  used  in  the  model 
**I  =  facility  type  code,  1-95. 


Table  5-6.  MARRAY  PARAMETERS* 

MARRAY  (I**,l) 

Maintenance  cost  of  old  facility 

MARRAY  (1,2) 

Maintenance  cost  of  new  facility 

MARRAY  (1,3) 

Old  maintenance  cost  increase  per  sector 

MARRAY  (1,4) 

Old  maintenance  cost  increase  per  center 

MARRAY  (1,5) 

Old  maintenance  cost  increase  per  tower 

MARRAY  (1,6) 

Old  maintenance  cost  increase  per  terminal  radar 

MARRAY  (1,7) 

Old  maintenance  cost  increase  per  FSS 

MARRAY  (1,8) 

New  maintenance  cost  increase  per  sector 

MARRAY  (1,9) 

New  maintenance  cost  increase  per  center 

MARRAY  (1,10) 

New  maintenance  cost  increase  per  tower 

MARRAY  (1,11) 

New  maintenance  cost  increase  per  terminal  radar 

MARRAY  (1,12) 

New  maintenance  cost  increase  per  FSS 

MARRAY  (1,13) 

Percent  of  cost  due  to  communications 

♦This  array  gives  all  of  the  O&M  parameters  used  in  the  model. 

**I  =  facility  type  code,  1-95. 

Table  5-7. 

OPARR  PARAMETERS 

Type  of 
Units 

Number  of  Units 

Number  of  Units 

Number  of  Units 

in  Baseline 

Required  in 

Required  in 

System  (1978) 

Current  Year 

Previous  Year 

Sectors 

OPARR  (1,1) 

OPARR  (1,2) 

OPARR  (1,3) 

Centers 

OPARR  (2,1) 

OPARR  (2,2) 

OPARR  (2,3) 

Towers 

OPARR  (3,1) 

OPARR  (3,2) 

OPARR  (3,3) 

Terminal 

Radars 

OPARR  (4,1) 

OPARR  (4,2) 

OPARR  (4,3) 

FSSs 

OPARR  (5,1) 

OPARR  (5,2) 

OPARR  (5,3) 
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Table  5-8.  SWARR  PARAMETERS 


Zero  if  circuit  is  not  switched,  one  otherwise 
Tariff  used  to  price  this  circuit 
Average  circuit  length 

Average  number  of  circuits  required  per  facility 

Total  length 

Total  quantity  required 

Busy  hour  average  utilization  per  circuit 
Total  utilization  of  all  circuits 
Equipment  cost  per  circuit 
Required  grade  of  service 


Circuit  Group  1 
Circuits  According  to  Type 


Circuit  Group  2 
Circuits  According  to  Type 
(Emphasis  on  Voice,  Data) 


Miscellaneous  voice  circuits 
FSS-to-tower  voice  circuits 
FSS-to-center  voice  circuits 
Tower-to-center  voice  circuits 
Center-to-center  voice  circuits 
FSS-to-public  voice  circuits 
Miscellaneous  data  circuits 
FSS-to-tower  data  circuits 
FSS-to-center  data  circuits 
Tower-to-center  data  circuits 
Center-to-center  data  circuits 
Miscellaneous  radio  circuits 
RCAG  radio  circuits 
FSS  radio  circuits 
Tower  radio  circuits 
BUEC  radio  circuits 
Miscellaneous  circuits 


FSS-to-tower  voice  circuits 
FSS-to-center  voice  circuits 
Tower-to-center  voice  circuits 
Center-to-center  voice  circuits 
FSS-to-public  voice  circuits 
FSS-to-FSS  voice  circuits 
Tower- to- tower  voice  circuits 
Miscellaneous  voice  circuits 
FSS-to-center  low-speed  data  circuits 
Miscellaneous  low-speed  data  circuits 
Tower-to-center  FDEP  circuits 
Tower-to-center  ARTS  circuits 
Center-to-center  high-speed  data  circuits 
Miscellaneous  high-speed  data  circuits 
WMSC  circuits 
RCAG  radio  circuits 
FSS  radio  circuits 
Tower  radio  circuits 
BUEC  radio  circuits 
Miscellaneous  radio  circuits 
Other  circuits 


Circuit  Group  3 
Circuits  According  to 
Terminating  Facilities 


Tower- to- tower  circuits 
Tower- to- FSS  circuits 
Tower-to-center  circuits 
Tower-to-railitary  circuits 
Tower- to- VOR  circuits 
Tower- to- Foreign  exchange 
Tower- to- RCO  circuits 
Tower- to- I LS  circuits 
Tower- to-wea ther  circuits 
Miscellaneous  tower  circuits 
Center-to-center  circuits 
Center-to-FSS  circuits 
Center-to-military  circuits 
Center- to- RCAG  circuits 
Center- to- BUEC  circuits 
Center- to- ARSR  circuits 
Center- to- RTR  circuits 
Center  foreign  exchange 
Center  miscellaneous  circuits 
FSS-to-FSS  circuits 
FSS-to-military  circuits 
FSS- to- VOR  circuits 
FSS  foreign  exchange  circuits 
FSS- to- RCO  circuits 
FSS- to- RTR  circuits 
FSS- to-weat her  circuits 
Miscellaneous  FSS  circuits 
Special  circuits 
Other  circuits 


Circuit  Group  4 

Circuits  According  to  Function  or  Use 


.  Military- to- FSS  circuits 
.  Military- to-tower  circuits 
.  Military-to-center  circuits 
.  Autovon  circuits 
.  Miscellaneous  military  circuits 
.  ZLS  circuits 
.  VORTAC  circuits 
.  DF  circuits 

.  Tower-to-center  circuits 
.  FSS-to-center  circuits 
.  FSS-to-tower  circuits 
.  Center- to- RCAG  circuits 
.  Tower- to- RTR  circuits 
.  Center- to- BUEC  circuits 
.  FSS- to- RCO  circuits 
.  Foreign  exchange  circuits 
.  Miscellaneous  comnunications  circuits 
.  Special  circuits 
.  Weather  circuits 
.  ARSR  circuits 
.  Other  circuits 
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Table  5-9.  TNSARR  FUNCTION  PARAMETERS 


TNSARR  (I,J,K,L)  (as  a  percent,  0  £  TNSARR  £  1) 

I  =  Facility  type  code,  1-95. 

J  =  Flag  to  indicate  whether  percentages  are  applicable  to  F&E  or 
O&M  costs. 

=  1 
FE 

J  =  2 
OM 

K  =  Flag  to  indicate  whether  percentages  apply  to  old  or  new 
equipment . 

r.,  =  l 
Old 

K  =  2 
New 

L  =  Year  (1-30) .  This  index  represents  the  years  1979  through 
1999. 


Table  5-10.  TRFARR  PARAMETERS 


TRFARR  (i, j) 


i  =  tariff  type 

j  =  1  represents  the  mileage  charge  in 
'Vmi/month 

j  =  2  represents  the  charge  in  C/month 


APPENDIX  A 


{ 

!  •* 

UPDATING  THE  COMMUNICATIONS  COST  MODEL 


The  Communications  Cost  Model  must  be  continually  updated  as 
become  available  to  maintain  its  timeliness.  Table  A-l  indicates 
arrays  to  be  updated  and  their  location  in  the  program  listing. 


«n» 

1 

I 

I 

I 


new  data 
specific 
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Table  A-l.  PROGRAM  UPDATE  PROCEDURE 

Type  of  New  Data 

Modify  Lines 

Facility  Data 

F&E  cost  per  facility 

29-1  to  29-7 

F&E  communications  percentage 

29-7  to  29-C 

Number  of  facilities 

29-C  to  29-H 

F&E  Interfacility  Cost  Increases 

30  to  31 

O&M  cost  per  facility 

32  to  41 

O&M  interfacility  cost  increases 

41  to  46 

O&M  communications  percentage 

47  to  56 

Interfacility  increase  in  number  of 

57  to  63 

facilities 

Facility  identifier 

71-1  to  71-B 

Circuit  Data 

Switch  indicator,  all  circuit  group 

68-1 

Tariff  indicator,  circuit  groups  1,2,3 

68-1 

Tariff  indicator,  circuit  group  4 

68-1  to  68-2 

Average  circuit  length,  circuit  group  1 

68-2 

Average  circuit  length,  circuit  group  2 

68-3  to  68-5 

Average  circuit  length,  circuit  group  3 

68-5  to  68-8 

Average  circuit  length,  circuit  group  4 

68-8  to  68-A 

Average  circuits  per  facility,  group  1 

68-A  to  68-B 

Average  circuits  per  facility,  group  2 

68— B  to  68-D 

Average  circuits  per  facility,  group  3 

68-D  to  68-F 

Average  circuits  per  facility,  group  4 

68-F  to  68-H 

Utilization  per  circuit,  group  1 

69-1  to  69-2 

Utilization  per  circuit,  group  2 

69-2  to  69-3 

Utilization  per  circuit,  group  3 

69-3  to  69-5 

Utilization  per  circuit,  group  4 

69-5  to  69-6 

Equipment  cost  per  circuit,  group  1 

69-6  to  69-8 

Equipment  cost  per  circuit,  group  2 

69-8  to  69-A 

Equipment  cost  per  circuit,  group  3 

69-A  to  69-D 

Equipment  cost  per  circuit,  group  4 

69-D  to  69-F 

Required  grade  of  service,  all  group 

69-G 

Tariff  Data 

74  to  75 

Model  Equations 

IFR  traffic 

327  to  330 

Sectors 

332  to  333 

Center 

334  to  335 

Airport  operations 

336  to  339 

Towers 

340  to  341 

Instrument  operations 

342  to  345 

Radars  (ASR) 

346  to  347 

Flight  services 

348  to  351 

.  Circuit  group  1 

470  to  503 

Circuit  group  2 

505  to  548 

Circuit  group  3 

550  to  609 

Circuit  group  4 

611  to  653 

A- 3 


APPENDIX  B 


FACILITY  ALPHA  CODES  AND  DESCRIPTIONS 


Table  B-l  contains  the  alpha  codes  and  descriptions. 


f.  »  - 
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Table  B-l .  FACILITY  ALPHA  CODES  AND  DESCRIPTIONS 

Alpha  Code 

Description 

ADCOC 

Air  Defense  Command  Operation  Control 

AID 

Airport  Information  Desk 

ARSR 

Air  Route  Surveillance  Radar  —  FAA  and  Military 

ARTCC 

Air  Route  Traffic  Control  Center 

ARTS 

Automated  Radar  Terminal  System 

ASR 

Airport  Surveillance  Radar  —  FAA  and  Military 

ATCT 

Airport  Traffic  Control  Tower 

BDIS 

Automatic  Data  Interchange  System,  Service  "B" 

BRITE 

Bright  Radar  Indicator  Terminal  Equipment 

BUEC 

Backup  Emergency  Communi cations 

CCC 

Central  Computer  Complex  —  IBM  9020  System 

CD 

Common  Digitizer 

CDC 

Computer  Display  Channel 

CERAP 

Combined  Center/RAPCO 

CRT 

Control  Circuit  Equipment 

CMLT 

Communications  Microwave  Link  Terminal 

COMCO 

Command  Communications  Outlet 

CST 

Combined  Station/Tower 

CTRB 

Center  Building  Maintenance 

DCC 

Display  Channel  Complex 

EDPS 

Electronic  Data  Processing  System 

FDEP 

Flight  Data  Entry  and  Printout 

FSS 

Flight  Service  Station 

GS 

Glide  Slope 

H 

Homing  Radio  Beacon 

HH 

Homing  Radio  Beacon  —  High  Power 

IATSC 

International  Aeronautical  Telecommunications 
Switching  Center 

IFSR 

International  Flight  Service  Receiving  Station 

IFSS 

International  Flight  Service  Station 

IFST 

International  Flight  Service  Transmitter  Station 

IM 

Inner  Marker 

(continued) 
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Table  B -1 .  (continued) 

Alpha  Code 

Description 

LCOT 

VHF/UHF  Link  Terminal 

LDA 

Localizer-Type  Directional  Aid 

LMM 

Compass  Locator  at  the  ILS  Middle  Marker 

LNKR 

Link  Repeater 

LOC 

ILS  Localizer 

LOM 

Compass  Locator  at  the  ILS  Outer  Marker 

LRCO 

Limited  Remote  Communication  Outlet 

MM 

Middle  Marker 

OAW 

Off-Airways  Weather  Station 

OM 

Outer  Marker 

ORES 

IFSS  Residual  Facility 

PAR 

Precision  Approach  Radar  —  FAA  and  Military 

RBDE 

Radar  Bright  Display  Equipment 

RCAG 

Remote  Center  Air/Ground  Communications  Facility 

RCO 

Remote  Communications  Outlet 

RMLR 

Radar  Microwave  Link  Repeater 

RMLT 

Radar  Microwave  Link  Terminal 

RTR 

Remote  Transmitter/Receiver  Facility 

SFO 

Single  Frequency  Outlet 

SSO 

Self-Sustained  Outlet 

TELEX 

Telephone  Exchange 

TOWB 

Tower  Building  Maintenance 

TRACO 

Terminal  Radar  Approach  Control 

TRCAB 

Terminal  Radar  Approach  Control  in  Tower  Cab 

TROPO 

Tropospheric  Scatter  Station 

TTS 

Teletype  Switching  Facilities 

TTY 

Teletypewriter  Station 

VOR 

VHF  Omnidirectional  Range 

VOT 

VHF  Omnidirectional  Range  Test 

WMSC 

Weather  Message  Switching  Center 
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